| line |
true |
false |
branch |
|
73
|
2 |
207 |
unless ($number =~ /^([+-]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/) |
|
78
|
1 |
206 |
if ($number > 1e+75) |
|
83
|
2 |
204 |
if $number == 0 |
|
86
|
6 |
198 |
if abs $number != $number |
|
91
|
9 |
195 |
if ($number != int $number) |
|
100
|
5 |
4 |
if ($decimal =~ s/^(0+([1-9][0-9]*))$/$2/) { } |
|
102
|
0 |
5 |
unless $decimal_power |
|
106
|
3 |
2 |
if $decimal > 1 |
|
134
|
184 |
256 |
if $blocks[$_] == 0 |
|
148
|
86 |
170 |
if ($hundred) |
|
152
|
58 |
28 |
unless $hundred == 1 |
|
159
|
3 |
10 |
if $hundred > 1 and not $teens and not $units and $_ == $#blocks |
|
169
|
73 |
127 |
if $units and not $teens and not $number == 1 && $power == 1000 |
|
176
|
18 |
238 |
if ($teens == 8) { } |
|
|
50 |
188 |
elsif ($teens == 7 or $teens == 9) { } |
|
|
79 |
109 |
elsif ($teens) { } |
|
179
|
13 |
5 |
$units ? : |
|
185
|
4 |
46 |
if ($teens == 7 and $units == 11) { } |
|
200
|
44 |
35 |
if ($teens == 1) { } |
|
|
5 |
30 |
elsif ($units == 1 or $units == 11) { } |
|
|
3 |
27 |
elsif ($units == 0) { } |
|
216
|
220 |
36 |
if $fr_decimal |
|
219
|
122 |
134 |
if ($power >= 1000) |
|
222
|
108 |
14 |
if (exists $Lingua::FR::Numbers::NUMBER_NAMES{$power}) { } |
|
226
|
39 |
69 |
if $number > 1 and $power >= 1000000 |
|
244
|
0 |
14 |
unless (exists $Lingua::FR::Numbers::NUMBER_NAMES{$pow_diff}) |
|
248
|
10 |
4 |
if $number > 1 |
|
267
|
3 |
22 |
unless ($number > 0) |
|
271
|
1 |
21 |
if $number == 1 |
|
276
|
5 |
13 |
if ($last_digit != 1 and exists $Lingua::FR::Numbers::ORDINALS{$last_digit}) |
|
297
|
0 |
0 |
if ($_[0]) |