| blib/lib/Storage/Abstract/Handle.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 22 | 63.6 |
| line | true | false | branch |
|---|---|---|---|
| 27 | 2 | 27 | if (fileno $self->{'handle'} != -1 and fileno $handle_to != -1) |
| 33 | 0 | 2 | unless defined $res |
| 45 | 0 | 51 | unless defined $bytes |
| 47 | 29 | 22 | if $bytes == 0 |
| 48 | 0 | 22 | unless &$write($buffer, $bytes) |
| 60 | 15 | 6 | if (fileno $handle == -1) { } |
| 66 | 0 | 15 | unless $success |
| 79 | 0 | 40 | if defined tied $arg and tied($arg)->isa($class) |
| 91 | 33 | 7 | if (ref $handle ne "GLOB") |
| 95 | 0 | 0 | ref $arg ? : |
| 0 | 33 | unless open $handle, "<:raw", $arg |