| line |
true |
false |
branch |
|
25
|
8 |
13 |
if @_ |
|
28
|
4 |
2 |
if @_ |
|
35
|
6 |
0 |
if ($class eq "Net::Server::Proto::UNIX") |
|
39
|
6 |
0 |
unless exists $server->{'server'}{'unix_type'} |
|
41
|
0 |
3 |
defined $server->{'server'}{'unix_type'} ? : |
|
|
3 |
3 |
defined $info->{'unix_type'} ? : |
|
43
|
2 |
4 |
if ($u_type eq 'SOCK_DGRAM' or $u_type eq '2') { } |
|
|
0 |
8 |
elsif ($u_type ne 'SOCK_STREAM' and $u_type ne '1') { } |
|
53
|
4 |
0 |
$info->{'port'} =~ m[^ ([\w\.\-\*\/]+) $ ]x ? : |
|
56
|
0 |
3 |
defined $server->{'server'}{'listen'} ? : |
|
|
1 |
3 |
defined $info->{'listen'} ? : |
|
64
|
0 |
0 |
if -e $path and not unlink($path) |
|
66
|
0 |
0 |
unless $sock->SUPER::configure({"Local", $path, "Type", 1, "Listen", $sock->NS_listen}) |
|
80
|
0 |
0 |
unless $sock->fdopen($fd, "w") |
|
86
|
0 |
0 |
if (wantarray) { } |
|
91
|
0 |
0 |
if (defined $client) |
|
94
|
0 |
0 |
wantarray ? : |
|
115
|
0 |
0 |
unless defined $bytes or defined $end_qr |
|
120
|
0 |
0 |
if (defined $bytes and length $content >= $bytes) { } |
|
|
0 |
0 |
elsif (defined $end_qr and $content =~ /$end_qr/) { } |
|
128
|
0 |
0 |
wantarray ? : |