I am using something like this to ping other hosts:
use strict;
use Net::Ping;
use Time::HiRes;
my $p = Net::Ping->new("icmp");
$p->hires();
while (1) {
my ($ret, $duration, $ip) = $p->ping($host, 5);
printf "02d:%02d:%02d,%d,%.0f\n",
$hour,$min,$sec,$ret,$duration*1000;
sleep 3;
}
This seems pretty close to the icmp example in the docs.
I get results of generally 16 ms or 0 ms. I never get a non-0 number less than 16 (and I get larger numbers in rough multiples of 16. So this looks like a Win32 issue of time granularity.
Is there something I can do?
Thanks, --traveler
Update: From reading lots of four-year-old posts here it seems that I have an old hires.dll, even though I have perl 5.8.1. Where do I get a new dll?
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.