| line |
true |
false |
branch |
|
16
|
3 |
0 |
$^O eq 'linux' ? : |
|
71
|
0 |
0 |
unless @paths |
|
76
|
0 |
0 |
unless open $write, '>', $fn |
|
85
|
0 |
0 |
if $$headers{'Status'} != 200 |
|
90
|
0 |
0 |
unless syswrite $write, $_[0] |
|
103
|
0 |
0 |
if $bytes and not $write |
|
117
|
0 |
1 |
if $$self{'readonly'} |
|
131
|
0 |
0 |
unless my $res = $$self{'backend'}->do_request('create_open', {%$create_open_args, 'domain', $$self{'domain'}, 'class', $class, 'key', $key, 'fid', $$opts{'fid'} || 0, 'multi_dest', 1}) |
|
145
|
0 |
0 |
if (not exists $$res{'dev_count'}) { } |
|
165
|
0 |
0 |
unless ($fh) |
|
170
|
0 |
0 |
unless setsockopt $socket_fh, 6, 3, 1 |
|
174
|
0 |
0 |
unless ($socket_fh) |
|
181
|
0 |
0 |
unless open my $fh_from, '<', $file |
|
208
|
0 |
0 |
unless (length $buf) |
|
211
|
0 |
0 |
unless (defined $bytes) |
|
216
|
0 |
0 |
if (0 == $bytes) |
|
223
|
0 |
0 |
if ($len and $len > 0) |
|
226
|
0 |
0 |
if (not defined $len and $! != 11) |
|
234
|
0 |
0 |
unless setsockopt $socket_fh, 6, 3, 0 |
|
235
|
0 |
0 |
unless shutdown $socket_fh, 1 |
|
245
|
0 |
0 |
if ($socket_fh->eof) |
|
252
|
0 |
0 |
if ($top =~ m[HTTP/1.[01]\s+2\d\d]) { } |
|
265
|
0 |
0 |
if ($error) |
|
271
|
0 |
0 |
if $error |
|
286
|
0 |
0 |
unless ($rv) |
|
298
|
0 |
0 |
if $$self{'readonly'} |
|
304
|
0 |
0 |
unless my $fh = $self->new_file($key, $class, undef, $opts) |
|
305
|
0 |
0 |
ref $content eq 'SCALAR' ? : |
|
310
|
0 |
0 |
unless $fh->close |