Хочу сделать более продвинутый ping.
Есть скрипт:
Соответсвенно:
Как по одной проверке, используя один метод, который возвращает несколько значений за одну проверку, выдернуть и положить в итемы нужные значения что бы потом отрисовать красивый график?
Есть скрипт:
Code:
debian:~# cat ping-tcp.pl
#!/usr/bin/perl
$host = $ARGV[0];
$ping=`fping -c 10 -p 50 -q $host 2>&1`;
($x, $y) = split (",", $ping);
($xmt,$rcv,$loss) = ($x =~ /(\d+)\/(\d+)\/(\d+)/);
($min,$avg,$max) = ($y =~ /(\d+\.?\d*)\/(\d+\.?\d*)\/(\d+\.?\d*)/);
$dev1 = $avg - $min;
$dev2 = $max - $avg;
$dev = ($dev1 + $dev2)/2;
print "min:$min avg:$avg max:$max dev:$dev loss:$loss";
debian:~#
Code:
debian:~# perl ping-tcp.pl 10.89.53.8 min:0.94 avg:5.23 max:43.0 dev:21.03 loss:0 debian:~#
Comment