| line |
true |
false |
branch |
|
47
|
0 |
0 |
unless $conns |
|
49
|
0 |
0 |
$wanted ? : |
|
50
|
0 |
0 |
if ($k =~ /^pipe:/) |
|
79
|
0 |
15 |
unless $server_url |
|
91
|
1 |
14 |
unless $srvsch =~ /\Ariap\+(tcp|unix|pipe)\z/ |
|
93
|
5 |
9 |
if ($srvsch eq 'riap+tcp') { } |
|
|
4 |
5 |
elsif ($srvsch eq 'riap+unix') { } |
|
|
5 |
0 |
elsif ($srvsch eq 'riap+pipe') { } |
|
94
|
3 |
2 |
if ($srvauth =~ /^(.+):(\d+)$/) { } |
|
103
|
2 |
2 |
if ($srvpath =~ m[(.+)/(/.*)]) { } |
|
|
1 |
1 |
elsif ($srvpath =~ /(.+)/) { } |
|
108
|
3 |
1 |
unless ($which eq 'parse0') |
|
109
|
2 |
1 |
if (defined $path) { } |
|
110
|
0 |
2 |
unless my $apath = abs_path($path) |
|
120
|
2 |
3 |
if ($srvpath =~ m[(.+?)//(.*?)/(/.*)]) { } |
|
|
1 |
2 |
elsif ($srvpath =~ m[(.+?)//(.*)]) { } |
|
|
1 |
1 |
elsif ($srvpath =~ /(.+)/) { } |
|
129
|
4 |
1 |
unless ($which eq 'parse0') |
|
130
|
3 |
1 |
if (defined $path) { } |
|
131
|
0 |
3 |
unless my $apath = abs_path($path) |
|
146
|
7 |
3 |
unless ($which eq 'parse0') |
|
150
|
0 |
7 |
if $res |
|
153
|
10 |
0 |
if ($which =~ /parse/) |
|
175
|
0 |
0 |
if ($cache) |
|
176
|
0 |
0 |
if ($srvsch =~ /tcp|unix/) { } |
|
177
|
0 |
0 |
if ($cache->{'socket'}->connected) { } |
|
185
|
0 |
0 |
if (kill 0, $cache->{'pid'}) { } |
|
197
|
0 |
0 |
unless ($cache) |
|
198
|
0 |
0 |
if ($srvsch =~ /tcp|unix/) { } |
|
200
|
0 |
0 |
if ($srvsch eq 'riap+tcp') { } |
|
215
|
0 |
0 |
if ($sock) { } |
|
219
|
0 |
0 |
$srvsch eq 'riap+tcp' ? : |
|
234
|
0 |
0 |
@$args ? : |
|
243
|
0 |
0 |
if ($pid) { } |
|
256
|
0 |
0 |
if $e |
|
264
|
0 |
0 |
if (not $line) { } |
|
|
0 |
0 |
elsif (not $line =~ /^j(.+)/) { } |
|
273
|
0 |
0 |
if ($e) |
|
281
|
0 |
0 |
if ($do_retry and $attempts++ < $self->{'retries'}) { } |
|
314
|
0 |
3 |
unless $res0->[0] == 200 |
|
317
|
1 |
2 |
if ($res->{'proto'} eq 'riap+unix') { } |
|
|
1 |
1 |
elsif ($res->{'proto'} eq 'riap+tcp') { } |
|
|
1 |
0 |
elsif ($res->{'proto'} eq 'riap+pipe') { } |