| 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 |
|
106
|
86 |
0 |
if ($] >= 5.012) { } |
|
117
|
86 |
0 |
if ($] >= 5.012) { } |
|
126
|
86 |
0 |
if ($] >= 5.012) { } |
|
136
|
86 |
0 |
if ($] >= 5.012) { } |
|
143
|
86 |
0 |
if ($] >= 5.012) { } |
|
150
|
86 |
0 |
if ($] >= 5.012) { } |
|
179
|
4 |
91 |
unless $n |
|
182
|
50 |
41 |
unless ($n % 2) |
|
212
|
120 |
196 |
if $aTen |
|
213
|
185 |
131 |
if $aOne |
|
227
|
90 |
46 |
$eTen ne '' || $eOne ne '' ? : |
|
|
136 |
89 |
$pos ? : |
|
|
225 |
91 |
$place ? : |
|
245
|
72 |
244 |
if ($eOne eq "\x{1369}" and $eTen eq '') |
|
246
|
29 |
43 |
if ($sep eq "\x{137b}") { } |
|
|
23 |
20 |
elsif ($place + 1 == $n) { } |
|
279
|
95 |
95 |
if @_ |
|
281
|
95 |
95 |
$self->number =~ /^[0-9]+$/ ? : |
|
292
|
190 |
190 |
if @_ |