2ed665eba1
- Fix path for ping in ping.pl - Rename a patch to a common scheme - Bump PORTREVISION Submitted by: Giraudet Olivier <giraudeo@altern.org>
10 lines
325 B
Perl
10 lines
325 B
Perl
--- scripts/ping.pl.orig Sat Apr 15 22:26:44 2006
|
|
+++ scripts/ping.pl Sat Apr 15 22:27:16 2006
|
|
@@ -1,6 +1,6 @@
|
|
#!/usr/bin/perl
|
|
|
|
-open(PROCESS, "ping -c 1 $ARGV[0] | grep icmp_seq |");
|
|
+open(PROCESS, "/sbin/ping -c 1 $ARGV[0] | grep icmp_seq |");
|
|
$ping = <PROCESS>;
|
|
close(PROCESS);
|
|
$ping =~ m/(.*time=)(.*) (ms|usec)/;
|