| line |
true |
false |
branch |
|
28
|
94 |
75 |
if @_ |
|
29
|
85 |
66 |
if @_ |
|
30
|
85 |
66 |
if @_ |
|
31
|
75 |
17 |
if @_ |
|
37
|
0 |
75 |
if $ISA[0] eq "IO::Socket::INET" and "Net::Server::Proto"->requires_ipv6($server) |
|
46
|
1 |
73 |
defined $server->{'server'}{'listen'} ? : |
|
|
1 |
74 |
defined $info->{'listen'} ? : |
|
48
|
0 |
75 |
if defined $info->{'orig_port'} |
|
50
|
75 |
0 |
wantarray ? : |
|
64
|
0 |
14 |
'Net::Server::Proto'->requires_ipv6($server) ? : |
|
66
|
14 |
0 |
$host ne '*' ? : |
|
|
0 |
0 |
$ipv eq '4' ? : |
|
|
0 |
0 |
$ipv eq '6' ? : |
|
|
0 |
14 |
$isa_v6 ? : |
|
|
0 |
14 |
unless $sock->SUPER::configure({"LocalPort", $port, "Proto", "tcp", "Listen", $lstn, "ReuseAddr", 1, "Reuse", 1, $host ne "*" ? ("LocalAddr", $host) : (), $isa_v6 ? ("Domain", $ipv eq 6 ? Socket6::AF_INET6() : ($ipv eq 4 ? 2 : 0)) : ()}) |
|
76
|
0 |
14 |
if ($port eq '0' and $port = $sock->sockport) { } |
|
|
0 |
28 |
elsif ($port =~ /\D/ and $port = $sock->sockport) { } |
|
90
|
0 |
0 |
unless $sock->fdopen($fd, "w") |
|
92
|
0 |
0 |
'Net::Server::Proto'->requires_ipv6($server) ? : |
|
93
|
0 |
0 |
if ($isa_v6) |
|
95
|
0 |
0 |
$ipv eq '4' ? : |
|
|
0 |
0 |
$ipv eq '6' ? : |
|
98
|
0 |
0 |
if ($port ne $sock->NS_port) |
|
108
|
0 |
9 |
if (wantarray) { } |
|
113
|
9 |
0 |
if (defined $client) |
|
116
|
0 |
9 |
wantarray ? : |
|
128
|
0 |
0 |
unless defined $bytes or defined $end_qr |
|
133
|
0 |
109 |
if (defined $bytes and length $content >= $bytes) { } |
|
|
2 |
107 |
elsif (defined $end_qr and $content =~ /$end_qr/) { } |
|
141
|
2 |
0 |
wantarray ? : |
|
152
|
0 |
30 |
defined do {
*$sock
}->{'NS_orig_port'} ? : |