Re: Trouble with Net::Ping

2002-03-01 Thread Joseph Bajin
ing->new('icmp'); > >by default Net::Ping uses UDP packets, but not all hosts will respond to >this. > >-Original Message- >From: Joseph Bajin [mailto:[EMAIL PROTECTED]] >Sent: Wednesday, February 27, 2002 8:43 AM >To: [EMAIL PROTECTED] >Subject: Tro

Re: Trouble with Net::Ping

2002-03-01 Thread Jan Gruber
Hi, Joseph && list ! On Friday 01 March 2002 02:44 pm, you wrote: > I am appearing to have some > troubles. It appears that it can not reach the hosts specified, but when I > try it manually it works just fine. # use TCP if we're not root, ICMP if we are my $pong = Net::Ping->new( $> ? ("tcp",

RE: Trouble with Net::Ping

2002-03-01 Thread Timothy Johnson
CTED] Subject: Trouble with Net::Ping $t = Net::Ping->new(); <\SNIP> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] This email may contain confi

Trouble with Net::Ping

2002-03-01 Thread jbajin
I am appearing to have some troubles. It appears that it can not reach the hosts specified, but when I try it manually it works just fine. Here is what I have for my code: #!/usr/bin/perl -w use strict; use Net::Ping; Initalize Variables# my @hosts= qw(au)

Trouble with Net::Ping

2002-02-27 Thread Joseph Bajin
I am appearing to have some troubles. Here is what I have for my code: #!/usr/bin/perl -w use strict; use Net::Ping; Initalize Variables# my @hosts= qw(au); my $t; my @lines; my $hostname; my %status; #while(1){ $t = Net::Ping->new(); foreach