Last update (honest) I ran several tests using new(“tcp”) in the script vs
new(“icmp”) and they all seemed to work fine, regardless of host / etc. A
firewall specifically blocking tcp SYNs to unknown ports might block this; but
basically it just sends a SYN to a port that wouldn’t likely be op
On further inspection, just wrapping it all in a script doesn’t work. The
calling program or user must be effectively root (or root) so a simple script
won’t work (as that is really just using the shell pgrogram to launch further
commands). You’d have to call the perl program from a user who h
hey Venkat -
Pinging (even /bin/ping) requires root (if you look at it on a UNIX / linux
machine it is almost always a SETUID binary, executing with root privelidges)
privileges.
The perl version is no different (same underlying reasons - opening a socket in
raw mode is a high privilege operat
Hello All,
We applied maintenance few months back and all went well. But
when we started looking at icmp then we are getting below issues.
SYS01:/u/venka> /usr/local/bin/perl5.6 -e 'use Net::Ping;
$p=Net::Ping->new("icmp", 2) or die bye; print "$ARGV[0] is alive \n" if
$p->ping($ARG
