| line |
true |
false |
branch |
|
16
|
3 |
0 |
$^O eq 'linux' ? : |
|
73
|
0 |
0 |
unless @paths |
|
78
|
0 |
0 |
unless open $write, '>', $fn |
|
87
|
0 |
0 |
if $headers->{'Status'} != 200 |
|
92
|
0 |
0 |
unless syswrite $write, $_[0] |
|
105
|
0 |
0 |
if $bytes and not $write |
|
119
|
0 |
0 |
if $self->{'readonly'} |
|
139
|
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}) |
|
147
|
0 |
0 |
if (exists $res->{'dev_count'}) { } |
|
167
|
0 |
0 |
unless ($fh) |
|
172
|
0 |
0 |
unless setsockopt $socket_fh, 6, 3, 1 |
|
176
|
0 |
0 |
unless ($socket_fh) |
|
183
|
0 |
0 |
unless open my $fh_from, '<', $file |
|
210
|
0 |
0 |
unless (length $buf) |
|
213
|
0 |
0 |
unless (defined $bytes) |
|
218
|
0 |
0 |
if (0 == $bytes) |
|
225
|
0 |
0 |
if ($len and $len > 0) |
|
228
|
0 |
0 |
if (not defined $len and $! != 11) |
|
236
|
0 |
0 |
unless setsockopt $socket_fh, 6, 3, 0 |
|
237
|
0 |
0 |
unless shutdown $socket_fh, 1 |
|
247
|
0 |
0 |
if ($socket_fh->eof) |
|
254
|
0 |
0 |
if ($top =~ m[HTTP/1.[01]\s+2\d\d]) { } |
|
267
|
0 |
0 |
if ($error) |
|
273
|
0 |
0 |
if $error |
|
288
|
0 |
0 |
unless ($rv) |
|
300
|
0 |
0 |
if $self->{'readonly'} |
|
306
|
0 |
0 |
unless my $fh = $self->new_file($key, $class, undef, $opts) |
|
307
|
0 |
0 |
ref $content eq 'SCALAR' ? : |
|
312
|
0 |
0 |
unless $fh->close |