Subject: | Setting ToS causes timeout on Win32 |
Setting ToS causes nothing to be sent out and the ping will eventually
timeout when on Windows XP Pro, SP1 with ActiveState Perl 5.8.7.815.
Seems to work OK on Linux with Perl 5.8.0.
$p = Net::Ping->new('icmp', 3, 56, undef, 0x00);
print "With zero TOS: $host is alive.\n" if $p->ping($host);
Works OK
$p = Net::Ping->new('icmp', 3, 56, undef, 0x28);
print "With hex 28 TOS: $host is alive.\n" if $p->ping($host);
Times out and nothing is sent out.