| blib/lib/Image/JpegCheck.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 18 | 77.7 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 4106 | 4 | if (ref $file) { } |
| 15 | 4 | 4102 | if (ref $file eq 'GLOB') { } |
| 4101 | 1 | elsif (ref $file eq 'SCALAR') { } | |
| 0 | 1 | elsif (ref $file eq 'Path::Class::File') { } | |
| 18 | 0 | 4101 | unless open my $fh, '<', $file |
| 26 | 0 | 4 | unless open my $fh, '<', $file |
| 50 | 3 | 4106 | if $buf ne "\377\330" |
| 64 | 0 | 20524 | if ($marker ne "\377") { } |
| 4106 | 16418 | elsif ($code >= 192 and $code <= 195) { } |