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