Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re: Redirect Question

by phydeauxarff (Priest)
on Sep 15, 2003 at 18:04 UTC ( #291621=note: print w/ replies, xml ) Need Help??


in reply to Redirect Question

On another note, why not go ahead and just add Net::Ping to your script so it will have the functionality instead of requiring you to pipe in output from ping?

use Net::Ping; my $ping = new Net::Ping ("icmp"); my $PING_TIMEOUT = 2; my $IP=$_; if ($ping->ping($IP, $PING_TIMEOUT)) { print "Ping Succeeded \n"; } else { print "Ping failed\n";} $ping->close();

Then you can just run your script with your IP as an argument...this would even make it easy to automate automate the script to run a list of IP's on a regular basis.


Comment on Re: Redirect Question
Download Code
Re: Re: Redirect Question
by jbaribeault (Novice) on Sep 15, 2003 at 18:45 UTC
    Thanks all!
    The script is just a quick-and-dirty capture to quantify some outage times for a customer. Since I knew I could just grok the output from a ping -s on solaris, that is what I did - simple. Thanks for the ideas though, and I will use Net:Ping if I ever need to do this again.
    Cheers!

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://291621]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (14)
As of 2014-07-14 17:18 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (269 votes), past polls