blib/lib/Gzip/Faster.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 22 | 72.7 |
line | true | false | branch |
---|---|---|---|
17 | 0 | 8 | unless open my $in, '<:raw', $file |
20 | 0 | 8 | unless close $in |
30 | 3 | 0 | if ($file_name) |
33 | 1 | 2 | if ($mod_time) |
43 | 1 | 1 | if (keys %options) { } |
57 | 4 | 2 | if (keys %options) { } |
61 | 1 | 3 | if (defined $file_name_ref and ref $file_name_ref ne 'SCALAR') { } |
68 | 1 | 3 | if (defined $mod_time_ref and ref $mod_time_ref ne 'SCALAR') { } |
85 | 1 | 0 | if (keys %options) { } |
91 | 0 | 1 | unless open my $in, '>:raw', $file |
93 | 0 | 1 | unless close $in |