Hi folks.
Got the simplest of small scripts that runs ping and shows the summary.
However, although the ping command works at the shell, it doesn't work
in the perl script.
any ideas?
#!/usr/bin/perl -w
while(1) {
my @lines=qx{ping -n 50 10.1.1.31};
my $times=pop @lines;
my
Gary Stainburn wrote:
Hi folks.
Got the simplest of small scripts that runs ping and shows the summary.
However, although the ping command works at the shell, it doesn't work
in the perl script.
any ideas?
#!/usr/bin/perl -w
while(1) {
my @lines=qx{ping -n 50 10.1.1.31};
my $times=pop
On Thursday 09 Sep 2004 12:20 pm, Flemming Greve Skovengaard wrote:
[snip]
Don't you mean 'ping -n -c 50 10.1.1.31' instead of 'ping -n 50
10.1.1.31'. Else read the man page for ping.
Thanks for that, missed the obvious.
--
Gary Stainburn
This email does not contain private or confidential