| line |
true |
false |
branch |
|
62
|
2 |
0 |
unless keys %params |
|
72
|
3 |
3 |
$legacy ? : |
|
85
|
0 |
6 |
if ($self->use_ping_socket and socket $fh, 2, 2, $proto_num) { } |
|
91
|
0 |
6 |
unless socket $fh, 2, 3, $proto_num |
|
98
|
0 |
6 |
if ($self->bind) |
|
101
|
0 |
0 |
unless CORE::bind $fh, $bind |
|
124
|
0 |
6 |
unless my $ping = shift() |
|
130
|
0 |
6 |
$ping_socket ? : |
|
133
|
3 |
3 |
if ($from_type == 0) { } |
|
134
|
3 |
0 |
if length $recv_msg >= $offset + 8 |
|
137
|
0 |
3 |
if length $recv_msg >= $offset + 36 |
|
142
|
3 |
3 |
if not $ping_socket and $from_pid != $ping->_pid |
|
143
|
0 |
3 |
if $from_seq != $ping->seq |
|
144
|
3 |
0 |
if ($from_type == 0) { } |
|
|
0 |
0 |
elsif ($from_type == 3) { } |
|
|
0 |
0 |
elsif ($from_type == 11) { } |
|
146
|
1 |
2 |
if inet_ntop(2, $from_ip) ne inet_ntop(2, $ip) |
|
153
|
1 |
1 |
$legacy ? : |
|
158
|
2 |
2 |
$legacy ? : |