Branch Coverage

blib/lib/Lingua/EUS/Numbers.pm
Criterion Covered Total %
branch 46 52 88.4


line true false branch
95 5 313 unless ($num =~ /^\d+$/)
100 1 312 if ($num > 999999999999 or $num < 0)
106 2 310 if $num == 0
107 70 240 if $Lingua::EUS::Numbers::num2alpha{$num}
119 112 54 unless $extra_digits == 1
124 100 66 unless $num =~ /000$/
127 32 134 if $len == 7 and $extra_digits == 1
131 22 22 if ($len <= 8 and $len >= 7 and $whats_left != 0 and not reverse($num) =~ /^[^0]000/)
139 78 88 if (length $num <= 6)
143 18 26 if ($hundreds != 0 and $tens == 0 and $units == 0 or $hundreds == 0 and $tens || $units and not $num =~ /^0/ or $thousands == 0 and $hundreds == 0 and $tens || $units)
159 240 0 if ($len <= 3)
178 0 352 if $num > 999 or $num < 0
179 96 256 if $num == 0
180 42 214 if $Lingua::EUS::Numbers::num2alpha{$num}
185 152 62 if ($len == 2)
192 62 0 if ($len == 3)
194 28 34 unless ($hundreds == 0)
197 28 0 if $tens or $units
220 0 214 if $num == 0
222 22 192 if $Lingua::EUS::Numbers::num2alpha{$num}
224 38 154 unless $diz
227 80 74 if ($diz =~ /[3579]/)
233 154 0 if ($unit) { }
251 5 157 unless $num =~ /^\d+$/
252 1 156 if $num < 0 or $num > 999999999999
253 1 155 if $num == 1