| line |
true |
false |
branch |
|
45
|
0 |
0 |
unless $conns |
|
47
|
0 |
0 |
$wanted ? : |
|
48
|
0 |
0 |
if ($k =~ /^pipe:/) |
|
77
|
0 |
15 |
unless $server_url |
|
89
|
1 |
14 |
unless $srvsch =~ /\Ariap\+(tcp|unix|pipe)\z/ |
|
91
|
5 |
9 |
if ($srvsch eq 'riap+tcp') { } |
|
|
4 |
5 |
elsif ($srvsch eq 'riap+unix') { } |
|
|
5 |
0 |
elsif ($srvsch eq 'riap+pipe') { } |
|
92
|
3 |
2 |
if ($srvauth =~ /^(.+):(\d+)$/) { } |
|
101
|
2 |
2 |
if ($srvpath =~ m[(.+)/(/.*)]) { } |
|
|
1 |
1 |
elsif ($srvpath =~ /(.+)/) { } |
|
106
|
3 |
1 |
unless ($which eq 'parse0') |
|
107
|
2 |
1 |
if (defined $path) { } |
|
108
|
0 |
2 |
unless my $apath = abs_path($path) |
|
118
|
2 |
3 |
if ($srvpath =~ m[(.+?)//(.*?)/(/.*)]) { } |
|
|
1 |
2 |
elsif ($srvpath =~ m[(.+?)//(.*)]) { } |
|
|
1 |
1 |
elsif ($srvpath =~ /(.+)/) { } |
|
127
|
4 |
1 |
unless ($which eq 'parse0') |
|
128
|
3 |
1 |
if (defined $path) { } |
|
129
|
0 |
3 |
unless my $apath = abs_path($path) |
|
144
|
7 |
3 |
unless ($which eq 'parse0') |
|
148
|
0 |
7 |
if $res |
|
151
|
10 |
0 |
if ($which =~ /parse/) |
|
173
|
0 |
0 |
if ($cache) |
|
174
|
0 |
0 |
if ($srvsch =~ /tcp|unix/) { } |
|
175
|
0 |
0 |
if ($cache->{'socket'}->connected) { } |
|
183
|
0 |
0 |
if (kill 0, $cache->{'pid'}) { } |
|
195
|
0 |
0 |
unless ($cache) |
|
196
|
0 |
0 |
if ($srvsch =~ /tcp|unix/) { } |
|
198
|
0 |
0 |
if ($srvsch eq 'riap+tcp') { } |
|
213
|
0 |
0 |
if ($sock) { } |
|
217
|
0 |
0 |
$srvsch eq 'riap+tcp' ? : |
|
232
|
0 |
0 |
@$args ? : |
|
241
|
0 |
0 |
if ($pid) { } |
|
254
|
0 |
0 |
if $e |
|
262
|
0 |
0 |
if (not $line) { } |
|
|
0 |
0 |
elsif (not $line =~ /^j(.+)/) { } |
|
271
|
0 |
0 |
if ($e) |
|
279
|
0 |
0 |
if ($do_retry and $attempts++ < $self->{'retries'}) { } |
|
312
|
0 |
3 |
unless $res0->[0] == 200 |
|
315
|
1 |
2 |
if ($res->{'proto'} eq 'riap+unix') { } |
|
|
1 |
1 |
elsif ($res->{'proto'} eq 'riap+tcp') { } |
|
|
1 |
0 |
elsif ($res->{'proto'} eq 'riap+pipe') { } |