A script I wrote that checks whether a host is reachable by various protocols like ICMP & TCP.
A nice script that will check if a host is up or not. #!/usr/bin/perl use warnings; use strict; use Net::Ping; # code source: http://www.perlmonks.org/?node_id=943892 # More: http://stackoverflow.com/questions/3960595/how-can-i-ping-a-host-with-a-perl-one-liner-with-netping #$| = 1; print "Please type a host to check: -:\n"; my $host = <>; #Reading input from STDIN. if (length($host) < 3) … Read more