| blib/lib/Acme/Opish.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 89 | 1 | 10 | if ($_[0] eq '-opish_prefix') |
| 98 | 1 | 13 | if (-f $_) { } |
| 100 | 0 | 1 | unless open IN, $_ |
| 107 | 0 | 1 | unless open OUT, ">$_" |
| 137 | 3 | 32 | /^[A-Z]/ ? : |
| 143 | 2 | 33 | if (exists $OK{lc $_}) { } |
| 1 | 32 | elsif (lc $_ eq 'ye') { } | |
| 1 | 31 | elsif (/^y[aeiouy]/i) { } | |
| 202 | 3 | 32 | if $is_capped |