--- lib/PXElator/httpd.pm 2009/08/28 19:44:38 328 +++ lib/PXElator/httpd.pm 2009/08/28 21:55:41 329 @@ -269,20 +269,10 @@ if ( my $amt = client::conf( $ip, 'amt' ) ) { print $client qq|

AMT

|, amt::info( $amt, $ip ); } - } else { - my $arp = { - map { - my @c = split(/\s+/,$_); - if ( $#c == 5 ) { - client::save_ip_mac( $c[0], $c[3] ); - ( uc $c[3] => $c[5] ) - } else { - } - } read_file('/proc/net/arp') - }; + } else { - warn "# arp ",dump( $arp ); + my $arp = clinet::arp_mac_dev; print $client ok , qq|

Clients on $server::ip

|