my ping function not detecting live hosts!!!

[MermaidGaby]

Everytime I try to ping live hosts with this code, I get the incorrect output ("not alive&quot. Why is it that it is not detecting live hosts. I know I may be making a dumb mistake, but, be nice, I am new to perl.

<code>
#use Net:ing perl library
use Net:ing;
#Create a new ping object
#$p=Net:ing->new();
$host=&quot;localhost&quot;;
$p = Net:ing->new();
if ($p->ping($host))
{print &quot;$host is alive.\n&quot;;}
else
{print &quot;not alive.\n&quot;;}
$p->close();
</code<

 

[justice41]

It's possible that your localhost doesn't have its udp echo port open. Net:ing uses the udp protocol by default, and it sends packets to the echo port of the queried host. If you have root privileges try an 'icmp' ping instead. 'Most' hosts will respond to an icmp echo request.

jaa

 

[kudithipudi]

Something I noticed when I used Net:ing was that Unix(linux) and Windows machines respond differently. As Justice41 said, it may be a difference between echo and ICMP. I worked around this by pinging the machine with echo first and then ICMP. And if both of them fail, I marked them as down. Hope this was helpful.

- V.

 

[MikeLacey]

Gaby,

Use another ping type -- try tcp, that should fix things. Mike

Want to get great answers to your Tek-Tips questions? Have a look at faq219-2884

It's like this; even samurai have teddy bears, and even teddy bears get drunk.