Question

How can I find an IP address is pingable or not? Also how can I find the pingable IP is static or dynamic using perl script?

Answer 1

How can I find an IP address is pingable or not?

[mpenning@tsunami ~]$ perl -e '$retval=system("ping -c 2 172.16.1.1");if ($retval==0) {print "It pings";} else { print "ping failed"; }'
PING 172.16.1.1 (172.16.1.1) 56(84) bytes of data.
64 bytes from 172.16.1.1: icmp_req=1 ttl=255 time=0.384 ms
64 bytes from 172.16.1.1: icmp_req=2 ttl=255 time=0.416 ms

--- 172.16.1.1 ping statistics ---
2 packets transmitted, 2 received, 0% packet loss, time 999ms
rtt min/avg/max/mdev = 0.384/0.400/0.416/0.016 ms
It pings[mpenning@tsunami ~]$

In more friendly form…

$retval=system("ping -c 2 172.16.1.1");
if ($retval==0) {
    print "It pings\n";
} else {
    print "ping failed\n";
}

Also how can I find the pingable IP is static or dynamic using perl script?

You can only do this if you have direct access to the DHCP server, or you can sniff the subnet and look for DHCP packets. We can’t answer this yet without more information.