Branch Coverage

blib/lib/Lingua/EN/Fractions.pm
Criterion Covered Total %
branch 16 16 100.0


line true false branch
60 29 1 if (my($negate, $preamble, $wholepart, $numerator, $denominator) = $number =~ /$fraction/)
62 12 17 if (exists $special_denominators{$denominator}) { }
63 8 4 if ($numerator == 1) { }
75 7 22 if ($numerator == 1 and $wholepart) { }
78 1 6 $denominator_as_words =~ /^[aeiou]/i ? :
86 11 18 if $negate
87 12 17 if $wholepart
89 18 11 if $numerator > 1