| line |
true |
false |
branch |
|
104
|
24 |
4 |
unless $num =~ /^(.+)[Ee](.+)$/ and @words = (&_handle_neg_dec($1), $Lingua::SU::Nums2Words::Exp_word, &_handle_neg_dec($2)) |
|
116
|
8 |
24 |
if $num < 0 |
|
123
|
24 |
0 |
unless $num =~ /^(.+)\Q$Lingua::SU::Nums2Words::Dec_char\E(.+)$/o and @words = (&_handle_int($1), $Lingua::SU::Nums2Words::Dec_word, &_handle_dec($2)) or $num =~ /^\Q$Lingua::SU::Nums2Words::Dec_char\E(.+)$/o and @words = ($Lingua::SU::Nums2Words::Digit_words{'0'}, $Lingua::SU::Nums2Words::Dec_word, &_handle_dec($1)) |
|
128
|
8 |
24 |
if $is_neg |
|
144
|
38 |
17 |
if $t > 0 |
|
149
|
1 |
31 |
unless join('', @words) =~ /\S/ |
|
164
|
19 |
26 |
if $n3 == 0 and $n2 == 0 and $n1 > 0 |
|
167
|
49 |
6 |
unless $n3 == 1 and @words = 'sa-ratus' |
|
172
|
9 |
46 |
if $n2 == 1 |
|
175
|
7 |
48 |
if ($n2 > 1) |
|
177
|
7 |
0 |
if $n1 > 0 |
|
181
|
2 |
8 |
if $n3 > 0 and $n2 == 0 and $n1 > 0 |
|
183
|
38 |
17 |
if $n3 != 0 or $n2 != 0 or $n1 != 0 |
|
197
|
30 |
0 |
if exists $Lingua::SU::Nums2Words::Digit_words{$t} |
|
200
|
0 |
13 |
unless join('', @words) =~ /\S/ |
|
211
|
119 |
10 |
unless not length $w or $w eq 'se' or not @_ |