| blib/lib/Lingua/EN/Fractions.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 16 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 65 | 32 | 1 | if (my($negate, $preamble, $wholepart, $numerator, $denominator) = $number =~ /$fraction/) |
| 67 | 12 | 20 | if (exists $special_denominators{$denominator}) { } |
| 68 | 8 | 4 | if ($numerator == 1) { } |
| 80 | 7 | 25 | if ($numerator == 1 and $wholepart) { } |
| 83 | 1 | 6 | $denominator_as_words =~ /^[aeiou]/i ? : |
| 91 | 11 | 21 | if $negate |
| 92 | 12 | 20 | if $wholepart |
| 94 | 19 | 13 | if $numerator != 1 |