| line |
true |
false |
branch |
|
73
|
0 |
56 |
unless ref $x |
|
77
|
0 |
56 |
if $x->is_nan |
|
83
|
1 |
55 |
if ($y->sign eq '-') |
|
88
|
45 |
11 |
if ($y < 1000) |
|
112
|
14 |
11 |
if ($index > 0) |
|
127
|
5 |
6 |
if (@num > 1 and 0 < $num[-1] and $num[-1] < 100) |
|
140
|
5 |
44 |
if $index == 0 or $number->is_zero |
|
141
|
9 |
35 |
if $index == 1 |
|
145
|
16 |
19 |
if (($index & 1) == 1) |
|
148
|
16 |
19 |
unless $number->is_one |
|
160
|
5 |
65 |
if $number->is_zero and not $only |
|
163
|
35 |
30 |
if $number <= $#$SMALL |
|
175
|
18 |
12 |
if ($num[0]) |
|
184
|
19 |
11 |
if ($num[1]) |
|
188
|
3 |
16 |
if ($num[1] <= $#$SMALL) { } |
|
192
|
15 |
1 |
if ($ones > 0) |