| line |
true |
false |
branch |
|
34
|
11 |
3 |
if @_ |
|
35
|
11 |
3 |
if @_ |
|
36
|
11 |
3 |
if @_ |
|
48
|
1 |
10 |
defined $udp->{'udp_recv_len'} ? : |
|
|
0 |
11 |
defined $info->{'udp_recv_len'} ? : |
|
50
|
11 |
0 |
$len =~ /^(\d+)$/ ? : |
|
53
|
0 |
11 |
defined $udp->{'udp_recv_flags'} ? : |
|
|
0 |
11 |
defined $info->{'udp_recv_flags'} ? : |
|
55
|
11 |
0 |
$flg =~ /^(\d+)$/ ? : |
|
63
|
0 |
11 |
exists $info->{'udp_broadcast'} ? : |
|
64
|
0 |
11 |
if defined $info->{'orig_port'} |
|
74
|
0 |
1 |
$host eq '*' ? : |
|
|
1 |
0 |
$ipv eq '4' ? : |
|
|
0 |
1 |
$ipv eq '6' ? : |
|
|
0 |
1 |
$sock->NS_broadcast ? : |
|
|
0 |
1 |
unless $sock->configure({"LocalPort", $port, "Proto", "udp", "ReuseAddr", 1, "Reuse", 1, "LocalAddr", $host eq "*" ? undef : $host, "Family", $ipv eq 6 ? &AF_INET6() : ($ipv eq 4 ? &AF_INET() : &AF_UNSPEC()), $sock->NS_broadcast ? ("Broadcast", 1) : ()}) |
|
84
|
0 |
1 |
if ($port eq 0 and $port = $sock->sockport) { } |
|
|
0 |
2 |
elsif ($port =~ /\D/ and $port = $sock->sockport) { } |