Help for this page

Select Code to Download


  1. or download this
    foreach my $host (@iparray) {
            if ( $p->ping( $host )){
            print " $host is alive\n ";
    
  2. or download this
    #!/usr/bin/perl
    use warnings;
    ...
    #    print ONLINE "$host online" unless $p->ping($host,0);
    }
    $p->close();