| line |
true |
false |
branch |
|
84
|
4882 |
11 |
if $max_read > $BUF_MAX |
|
87
|
1 |
4892 |
if ($premature_eof) { } |
|
117
|
1 |
4892 |
if ($amt_read <= 0 and $max_read - $real_len > 0) |
|
129
|
8 |
4885 |
if ((my $padlen = $BLOCK_SIZE - $len % $BLOCK_SIZE) != $BLOCK_SIZE) |
|
136
|
0 |
4893 |
if (($written = $handle->write($buf, $len)) != $len) |
|
157
|
0 |
75 |
if ($header->{'truncated'}) |
|
159
|
0 |
0 |
if ($opts->{'gnu_extensions'}) { } |
|
|
0 |
0 |
elsif ($opts->{'posix_extensions'}) { } |
|
178
|
13 |
62 |
if ($inode->file and $header->{'size'} > 0) |
|
184
|
0 |
73 |
unless ($handle->write($blocks, $header_len) == $header_len) |
|
190
|
11 |
62 |
if $fh |
|
193
|
2 |
73 |
if ($!) |
|
194
|
1 |
1 |
if ($! == &Errno::ENOENT and $opts->{'ignore_missing'}) { } |
|
|
0 |
1 |
elsif ($! == &Errno::EACCES and $opts->{'ignore_inaccessible'}) { } |
|
196
|
1 |
0 |
if ref $opts->{'ignore_missing'} eq 'CODE' |
|
200
|
0 |
0 |
if ref $opts->{'ignore_inaccessible'} eq 'CODE' |
|
251
|
1 |
10 |
ref $_[0] eq 'HASH' ? : |
|
259
|
1 |
75 |
if $inode->sock |