diff --git a/perl/vping b/perl/vping index 6747e8a..7bd2fbb 100755 --- a/perl/vping +++ b/perl/vping @@ -11,13 +11,13 @@ $dns=$ARGV[0]; if ($^O == "linux") { $regex=qr/(?[0-9]+ bytes) from (?[a-z\.-]+) \((?[0-9\.]+)\).*seq=(?[0-9]+).*time=(?[0-9\.]+) ms/; - $dedjex=qr/no answer yet for icmp_seq=(?[0-9]+)/ - $pingcmd="ping -O" + $dedjex=qr/no answer yet for icmp_seq=(?[0-9]+)/; + $pingcmd="ping -O"; } elsif ($^O == "MSWin32") { # untested lol $regex=qr/Reply from (?[0-9\.]+).*bytes time=(?[0-9\.]+)ms.*/; - $dedjex=qr/Request timed out|Destination host unreachable/ - $pingcmd="ping -t" + $dedjex=qr/Request timed out|Destination host unreachable/; + $pingcmd="ping -t"; } else { print "IDK WHAT OS YOU ARE :("; exit 1;