Discussion:
How check ping x.x.x.x Ok or Bad ?
(too old to reply)
Serg
2005-12-23 11:53:34 UTC
Permalink
How from the perl on NW check:

ping x.x.x.x ok or bad ?

Serg
Randolf Richardson
2005-12-23 16:55:04 UTC
Permalink
Post by Serg
ping x.x.x.x ok or bad ?
Serg
You'll need to use the Net::Ping module. According to Novell this was
fixed in the 2003-Oct release, so as long as you're using the current
version you should be okay.

Perl for NetWare Changelog
http://developer.novell.com/wiki/index.php/Perl_for_NetWare_Changelog
Randolf Richardson
2005-12-23 16:57:48 UTC
Permalink
Post by Randolf Richardson
Post by Serg
ping x.x.x.x ok or bad ?
Serg
You'll need to use the Net::Ping module. According to Novell this was
fixed in the 2003-Oct release, so as long as you're using the current
version you should be okay.
Perl for NetWare Changelog
http://developer.novell.com/wiki/index.php/Perl_for_NetWare_Changelog
Some sample code for using Net::Ping in PERL can be found here:

search.cpan.org: Net::Ping - check a remote host for reachability
http://search.cpan.org/~bbb/Net-Ping-2.31/lib/Net/Ping.pm

I hope that helps. Let us know how it works for you, okay?
--
Randolf Richardson - ***@inter-corporate.com
Inter-Corporate Computer & Network Services, Inc.
Vancouver, British Columbia, Canada
http://www.inter-corporate.com/

This message originated from within a secure, reliable,
high-performance network ... a Novell NetWare network.
Serg
2005-12-24 06:32:10 UTC
Permalink
Post by Randolf Richardson
Post by Randolf Richardson
Post by Serg
ping x.x.x.x ok or bad ?
Serg
You'll need to use the Net::Ping module. According to Novell this was
fixed in the 2003-Oct release, so as long as you're using the current
version you should be okay.
Perl for NetWare Changelog
http://developer.novell.com/wiki/index.php/Perl_for_NetWare_Changelog
search.cpan.org: Net::Ping - check a remote host for reachability
http://search.cpan.org/~bbb/Net-Ping-2.31/lib/Net/Ping.pm
I hope that helps. Let us know how it works for you, okay?
I test this in my NW6.5SP4A:
use Net::Ping;
$host="172.16.17.250";
$p = Net::Ping->new();
print "$host is alive.\n" if $p->ping($host);
$p->close();

Work OK !

Thank you for help.

Serg

Loading...