| line |
true |
false |
branch |
|
50
|
0 |
190 |
if ($#_ > 1) |
|
54
|
0 |
190 |
unless ($number =~ /^\d+$/ or $number =~ /^[\x{1369}-\x{137c}]+$/) |
|
75
|
0 |
1 |
if @_ |
|
87
|
9 |
86 |
if length $_[0]{'number'} == 1 |
|
149
|
4 |
91 |
unless $n |
|
152
|
50 |
41 |
unless ($n % 2) |
|
182
|
120 |
196 |
if $aTen |
|
183
|
185 |
131 |
if $aOne |
|
197
|
90 |
46 |
$eTen ne '' || $eOne ne '' ? : |
|
|
136 |
89 |
$pos ? : |
|
|
225 |
91 |
$place ? : |
|
215
|
72 |
244 |
if ($eOne eq '፩' and $eTen eq '') |
|
216
|
29 |
43 |
if ($sep eq '፻') { } |
|
|
23 |
20 |
elsif ($place + 1 == $n) { } |
|
249
|
95 |
95 |
if @_ |
|
251
|
95 |
95 |
$self->number =~ /^[0-9]+$/ ? : |
|
262
|
190 |
190 |
if @_ |