Help for this page

Select Code to Download


  1. or download this
    print "START: Interface report on $hostname\n";
for(my $i = 0; $i <= $#dat; $i++){
...
}

print "END: Interface report on $hostname\n";
  2. or download this
    START: Interface report on nodename
hme0 UP   
...
hme1 UP   
  xxx.xxx.xxx.xxx
END: Interface report on nodename
  3. or download this
    push @dat, [ $interface_name, $ifstatus ] ;
then later...
$dat[$ip_count][2]=$ipaddr;