All I can tell you is that it's the same error on Windows 2000 Pro with same code.

Update: I tried changing the protocols around and came up with these results:

$p = Net::Ping->new("udp");
[download]

Same error as above

$p = Net::Ping->new("tcp");
[download]

The Unsupported function alarm function is unimplemented at C:/Perl/lib/Net/Ping.pm line 308.

$p = Net::Ping->new("icmp");
[download]

This last one worked perfectly..
HTH