| 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) |
|
45
|
1 |
73 |
defined $server->{'server'}{'listen'} ? : |
|
|
1 |
74 |
defined $info->{'listen'} ? : |
|
47
|
0 |
75 |
if defined $info->{'orig_port'} |
|
49
|
75 |
0 |
wantarray ? : |
|
64
|
14 |
0 |
$host ne '*' ? : |
|
|
0 |
0 |
$ipv eq '4' ? : |
|
|
0 |
0 |
$ipv eq '6' ? : |
|
|
0 |
14 |
$sock->isa('IO::Socket::INET6') ? : |
|
|
0 |
14 |
unless $sock->SUPER::configure({'LocalPort', $port, 'Proto', 'tcp', 'Listen', $lstn, 'ReuseAddr', 1, 'Reuse', 1, $host ne '*' ? ('LocalAddr', $host) : (), $sock->isa('IO::Socket::INET6') ? ('Domain', $ipv eq '6' ? Socket6::AF_INET6() : ($ipv eq '4' ? 2 : 0)) : ()}) |
|
74
|
0 |
14 |
if ($port eq '0' and $port = $sock->sockport) { } |
|
|
0 |
28 |
elsif ($port =~ /\D/ and $port = $sock->sockport) { } |
|
88
|
0 |
0 |
unless $sock->fdopen($fd, 'w') |
|
90
|
0 |
0 |
if ($sock->isa('IO::Socket::INET6')) |
|
92
|
0 |
0 |
$ipv eq '4' ? : |
|
|
0 |
0 |
$ipv eq '6' ? : |
|
95
|
0 |
0 |
if ($port ne $sock->NS_port) |
|
105
|
0 |
9 |
if (wantarray) { } |
|
110
|
9 |
0 |
if (defined $client) |
|
113
|
0 |
9 |
wantarray ? : |
|
125
|
0 |
0 |
unless defined $bytes or defined $end_qr |
|
130
|
0 |
50 |
if (defined $bytes and length $content >= $bytes) { } |
|
|
2 |
48 |
elsif (defined $end_qr and $content =~ /$end_qr/) { } |
|
138
|
2 |
0 |
wantarray ? : |
|
149
|
0 |
30 |
defined do {
*$sock
}->{'NS_orig_port'} ? : |