line |
!l |
l&&!r |
l&&r |
condition |
254
|
31 |
29 |
22 |
@nums and $i < $nums[0] |
294
|
0 |
33 |
0 |
defined $$self{'thousands_separator'} and length $$self{'thousands_separator'} |
339
|
33 |
106 |
0 |
@words and do {
$factor = exists $WORDS{$words[0]} ? 1 : ($words[0] =~ s/zeci\z// ? 10 : 0);
if ($factor) {
$amount = shift @words;
};
$factor
} || @words && exists $BIGWORDS{$words[0]} && do {
$factor = $BIGWORDS{shift @words}
} || do {
shift @words;
next
} |
385
|
12 |
73 |
2 |
@words and $words[0] eq 'de' |
397
|
33 |
68 |
5 |
@words and $words[0] eq $dec_point |
415
|
0 |
5 |
2 |
@decs and $decs[0] == 0 |
432
|
0 |
0 |
41 |
$number > 19 and $number < 100 |
469
|
713 |
0 |
87 |
$number >= $BIGNUMS[$j - 1]{'num'} and $number <= $BIGNUMS[$j]{'num'} |
481
|
60 |
0 |
27 |
$cat >= 100 and $cat < 1000 |
483
|
0 |
2 |
25 |
@of and $rest != 0 |
|
2 |
19 |
6 |
@of and $rest != 0 and exists $DIGITS{$rest} |