Branch Coverage

blib/lib/Lingua/TL/Numbers.pm
Criterion Covered Total %
branch 51 56 91.0


line true false branch
27 25 14 if ($word =~ /[aeiou]$/) { }
4 10 elsif ($word =~ /n$/) { }
30 29 10 if $number % $div
37 116 163 if $number < 20
39 69 94 if ($number < 100)
41 58 11 if $number % 10
44 55 39 if ($number < 1000)
46 38 17 $word =~ /[aeiou]$/ ? :
47 38 17 if $number % 100
51 27 12 if $number < 1000000
52 12 0 if $number < 1000000000
58 0 118 if $number < 1 or $number > 999999999
66 1 14 if 1 == $number
67 1 13 if 2 == $number
68 1 12 if 3 == $number
70 0 12 unless my $word = num2tl($number)
73 4 8 if $word =~ /^[aeiou]/
81 1 14 if 1 == $number
82 1 13 if 2 == $number
83 1 12 if 3 == $number
85 0 12 unless my $word = num2tl($number)
88 4 8 if ($word =~ /^[aieou]/) { }
1 7 elsif ($word =~ /^w/) { }
6 1 elsif ($word =~ /^[dtls]/) { }
1 0 elsif ($word =~ /^p/) { }
105 17 43 if exists $options{$key}
108 15 15 $opts{'ika'} ? :
111 2 28 if $opts{'hypen'}