| lib/MIME/Type.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 0 | 2048 | unless my $type = $self->{'MT_type'} = $args->{'type'} |
| 44 | 219 | 1729 | $self->mediaType eq 'text' ? : |
| 100 | 1948 | $args->{'encoding'} ? : | |
| 48 | 0 | 2048 | if defined $args->{'system'} |
| 60 | 55 | 2080 | unless @_ |
| 64 | 0 | 7 | $mime eq 'text' ? : |
| 2073 | 7 | $mime =~ m[^\s*(?:x\-)?([\w.+-]+)/(?:x\-)?([\w.+-]+)\s*$]i ? : | |
| 77 | 1943 | 7 | +(shift())->{'MT_simplified'} =~ m[^([\w.-]+)/] ? : |
| 81 | 2 | 0 | +(shift())->{'MT_simplified'} =~ m[/([\w+.-]+)$] ? : |
| 110 | 7 | 30 | ref $other ? : |