| line |
true |
false |
branch |
|
80
|
0 |
42 |
if ($radix < 2) |
|
99
|
4889 |
38 |
if ($value = $$self{'value'} += $$self{'inc'}) |
|
105
|
293 |
4596 |
if (not $$self{'including_repdigits'} and $$self{'b'} == $$self{'a'}) |
|
114
|
552 |
4337 |
if ($$self{'b'} >= $radix) |
|
125
|
102 |
450 |
if (++$$self{'a'} >= $radix) |
|
160
|
12 |
5134 |
if ($i < 0) |
|
166
|
2404 |
2730 |
$including_repdigits ? : |
|
169
|
3200 |
1934 |
if ($i < $pair_step or _is_infinite($i)) |
|
177
|
1474 |
1726 |
if (not $including_repdigits and $i > $radix) |
|
186
|
882 |
1052 |
$including_repdigits ? : |
|
195
|
882 |
1052 |
if ($including_repdigits) { } |
|
212
|
1689 |
445 |
unless $i_len-- >= 0 |
|
224
|
0 |
33839 |
if (_is_infinite($value)) |
|
227
|
1784 |
32055 |
if ($value != int $value) |
|
233
|
31749 |
306 |
if ($value = int $value / $radix) |
|
235
|
2708 |
29041 |
if (not $$self{'including_repdigits'} and $a == $b) |
|
241
|
22389 |
4722 |
if ($value % $radix != $a) |
|
244
|
2070 |
1066 |
if ($value % $radix != $b) |
|
254
|
90 |
31259 |
if ($value <= 0) |
|
257
|
0 |
31259 |
if (_is_infinite($value)) |
|
265
|
290 |
30969 |
unless @digits |
|
278
|
15026 |
15943 |
$including_repdigits ? : |
|
|
22179 |
8790 |
$including_repdigits || $a < $b ? : |
|
|
15026 |
15943 |
$including_repdigits ? : |
|
286
|
2414 |
28555 |
if (not $including_repdigits and $a == $b) |
|
291
|
28555 |
0 |
if ($including_repdigits or $a != $b) |
|
295
|
23749 |
5886 |
if ((my $c = pop @digits) != $a) |
|
296
|
10157 |
13592 |
if ($c < $a) |