line |
true |
false |
branch |
42
|
0 |
190 |
if ($#_ > 2) |
46
|
0 |
190 |
if ($number =~ /lower|upper/) |
50
|
190 |
0 |
if ($number) |
51
|
0 |
190 |
if (not $number =~ /^\d+$/ || $number =~ /^[\x{304}\x{33f}\x{2160}-\x{2182}]+$/) { } |
59
|
0 |
190 |
if ($style) |
60
|
0 |
0 |
if ($style =~ /lower|upper/i) { } |
85
|
0 |
1 |
if @_ |
102
|
11 |
84 |
if length $_ == 1 |
137
|
95 |
124 |
unless defined $number |
142
|
54 |
165 |
if ($number >= 40000) { } |
147
|
124 |
38 |
if ($group != /^0+$/) |
148
|
88 |
36 |
if ($lines) { } |
151
|
70 |
18 |
$roman ? : |
166
|
16 |
344 |
if ($number >= 10000) { } |
|
0 |
344 |
elsif ($number >= 9000) { } |
|
0 |
344 |
elsif ($number >= 5000) { } |
|
0 |
344 |
elsif ($number >= 4000) { } |
|
30 |
314 |
elsif ($number >= 1000) { } |
|
0 |
314 |
elsif ($number >= 900) { } |
|
4 |
310 |
elsif ($number >= 500) { } |
|
0 |
310 |
elsif ($number >= 400) { } |
|
128 |
182 |
elsif ($number >= 100) { } |
|
0 |
182 |
elsif ($number >= 90) { } |
|
4 |
178 |
elsif ($number >= 50) { } |
|
1 |
177 |
elsif ($number >= 40) { } |
|
43 |
134 |
elsif ($number > 12) { } |
|
64 |
70 |
elsif ($number >= 10) { } |
261
|
95 |
95 |
if @_ |
263
|
95 |
95 |
$self->number =~ /^[0-9]+$/ ? : |
269
|
190 |
0 |
$$self{'style'} eq 'upper' ? : |
280
|
95 |
190 |
if @_ |
291
|
0 |
0 |
if @_ |