Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
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
Replies are listed 'Best First'.
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 perusing the Monastery: (17)
As of 2015-07-28 14:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (256 votes), past polls