blib/lib/File/Headerinfo.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 9 | 14 | 64.2 |
line | true | false | branch |
---|---|---|---|
48 | 0 | 5 | unless $class |
50 | 1 | 4 | if $@ |
85 | 0 | 4 | if @_ |
97 | 0 | 5 | unless $path |
99 | 0 | 5 | unless my $class = $$media_classes{$type or _suffix($path)} |
207 | 0 | 63 | unless $self->allowed_field($field) |
208 | 18 | 45 | if @_ |