I have been using Net::Ping for a few months now, and have had no problems.
I usually initialize it like this:
use Net::Ping;
$p = Net::Ping->new('icmp',2);
if($p->ping($client) == 1){
print "$client exists\n";
}else{
print "No ping on $client\n";
}
The 'icmp' part is important because my windows clients would not respond to
the default when I first tried it.
Is it returning 1, 0, or undef? Are you including backslashes in your
query? Does it work if you use the same program shelling out the ping using
backticks or system()?
-----Original Message-----
From: Louis Selvon [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, November 28, 2001 7:58 AM
To: [EMAIL PROTECTED]
Subject: Has anyone been successful at using the Net::Ping module ??
Hi:
I have tried in vain to get the Net::Ping module to work, but every single
hostname I tried to ping using perl ping module is telling me that the
hostname is not alive.
I have tried all tcp, udp, and icmp options with no luck.
When I ping normally at the command line, tells me that hostname is alive.
Does the Net::Ping module actually work ??
Louis.
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
--------------------------------------------------------------------------------
This email may contain confidential and privileged
material for the sole use of the intended recipient.
If you are not the intended recipient, please contact
the sender and delete all copies.
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
