blib/lib/File/MimeInfo.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 13 | 24 | 54.1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
35 | 15 | 5 | 1 | inodetype($file) || globs($file) || default($file) |
131 | 0 | 2 | 4 | $] < "5.008" or not utf8::valid($line) |
168 | 3 | 0 | 0 | $file || croak("Could not open file '${file}' for reading") |
172 | 3 | 0 | 30 | /^\s*#/ or not /\S/ |
219 | 2 | 0 | 0 | $file || croak("Could not open file '${file}' for reading") |
252 | 3 | 0 | 0 | $file || croak("Could not open file '${file}' for reading") |
272 | 5 | 0 | 0 | pop() || croak('mimetype_isa needs argument') |
274 | 0 | 2 | 3 | ref $mimet or not defined $mimet |