- or download this
#!/usr/bin/perl
...
return ( $p->ping($host) ) ? 0 : 1;
}
- or download this
From perldoc Net::Ping
...
the remote host is considered reachable. Specifying the
"icmp" protocol requires that the program be run as root or
that the program be setuid to root.
- or download this
#!/usr/bin/perl
...
yahoo.com 80 Up