| line |
true |
false |
branch |
|
101
|
0 |
3 |
if (@_) { } |
|
106
|
2 |
1 |
unless (defined $Default) |
|
108
|
0 |
2 |
unless open my $fh, '<', $file |
|
158
|
61 |
7377 |
if (ref $args[0] ne 'Media::Type::Simple') |
|
159
|
2 |
59 |
unless (defined $Work) |
|
195
|
792 |
0 |
if ($line) |
|
226
|
3 |
50 |
unless defined $spec and length $spec |
|
327
|
4 |
1 |
if $SPEC_CASES{"$cat/$spec"} |
|
331
|
13 |
19 |
if self()->is_type($_) |
|
359
|
10 |
1 |
if (my $exts = self()->is_type(args())) { } |
|
360
|
8 |
2 |
wantarray ? : |
|
376
|
2 |
2 |
wantarray ? : |
|
399
|
7 |
1 |
if (exists self()->{'extens'}{$ext}) { } |
|
429
|
5 |
0 |
if (my $ts = self()->is_ext($ext)) { } |
|
431
|
2 |
3 |
wantarray ? : |
|
467
|
794 |
0 |
if (@exts or 1) |
|
471
|
791 |
3 |
unless (self()->{'types'}{$cat}{$spec}) |
|
478
|
1034 |
86 |
unless exists self()->{'extens'}{$_} |
|
498
|
0 |
4 |
if ref $self ne 'Media::Type::Simple' |