Files
cacti/scripts/ping.pl
T
Andy Blyler ea1172ea38 replaced old ping script with the one Ian posted to: http://raxnet.net/board/viewtopic.php?t=442&highlight=ping+redhat&sid=5df2ce013957f94b0975ddd8867e5152
git-svn-id: svn+ssh://repo.cacti.net/var/data/svnroot/cacti/trunk/cacti@562 860744bd-22fc-0310-8c96-e9fe5004b5ca
2003-02-20 13:54:21 +00:00

7 lines
121 B
Perl

#!/usr/bin/perl
$ping = `ping -c 1 $ARGV[0] -w 1 | grep icmp_seq`;
$ping =~ s/(.*time=)(.*) (ms|usec)//;
print $2;