| line |
true |
false |
branch |
|
36
|
0 |
1 |
unless my $socket = 'IO::Socket::INET'->new('Proto', 'icmp', 'Type', 3, 'Blocking', 0) |
|
115
|
0 |
0 |
if ($type == $ICMP_ECHOREPLY) { } |
|
|
0 |
0 |
elsif ($type == $ICMP_DEST_UNREACH or $type == $ICMP_TIME_EXCEEDED) { } |
|
133
|
0 |
0 |
unless $request |
|
136
|
0 |
0 |
unless $sequence == @{$request->{'results'};} + 1 |
|
138
|
0 |
0 |
if ($type == $ICMP_ECHOREPLY) { } |
|
|
0 |
0 |
elsif ($type == $ICMP_DEST_UNREACH) { } |
|
|
0 |
0 |
elsif ($type == $ICMP_TIME_EXCEEDED) { } |
|
141
|
0 |
0 |
if ($data eq $request->{'data'}) { } |
|
162
|
0 |
0 |
if exists $request->{'timer'} |
|
166
|
0 |
0 |
if (@$results == $request->{'times'} or $result eq 'ERROR') { } |
|
171
|
0 |
0 |
if ($tasks->[$i] == $request) |
|
227
|
0 |
0 |
unless $socket->send($msg, 0, $request->{'destination'}) |
|
239
|
0 |
0 |
if length($msg) % 2 |