| line |
true |
false |
branch |
|
24
|
68 |
18 |
if ($tag eq ':test') |
|
33
|
0 |
29 |
$rt eq 'HASH' ? : |
|
|
8 |
29 |
$rt eq 'ARRAY' ? : |
|
39
|
9 |
77 |
if ($tag eq ':insecure') |
|
44
|
0 |
69 |
if (defined $ENV{'PATRO_THREADS'} and not $ENV{'PATRO_THREADS'}) |
|
51
|
69 |
0 |
unless (defined &threads::tid) |
|
54
|
0 |
69 |
if ($ENV{'PATRO_THREADS'} and not $Patro::Archy::threads_avail) |
|
64
|
0 |
68 |
if @_ == 0 |
|
71
|
4751 |
0 |
@_ ? : |
|
73
|
4723 |
28 |
unless (Patro::LeumJelly::isProxyRef($ref)) |
|
82
|
33 |
21 |
unless (Patro::LeumJelly::isProxyRef($ref)) |
|
95
|
0 |
14 |
unless (Patro::LeumJelly::isProxyRef(CORE::ref $_[0])) |
|
105
|
0 |
0 |
if $threads::threads |
|
106
|
0 |
0 |
CORE::ref($_) =~ /^Patro::N/ ? : |
|
|
0 |
0 |
CORE::ref $_ ? : |
|
110
|
0 |
0 |
if ($INC{'Test/More.pm'}) { } |
|
125
|
12 |
14 |
unless (CORE::ref $config) |
|
126
|
3 |
9 |
if (-f $config) { } |
|
133
|
0 |
26 |
unless $config->{'host'} |
|
134
|
0 |
26 |
unless $config->{'port'} |
|
139
|
0 |
26 |
unless socket my $socket, 2, 1, getprotobyname 'tcp' |
|
141
|
0 |
26 |
unless connect $socket, $paddr |
|
168
|
6 |
20 |
if (CORE::ref $patro ne 'Patro') |
|
171
|
18 |
8 |
wantarray ? : |