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 |