blib/lib/Math/NumSeq/RepdigitAny.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 22 | 22 | 100.0 |
line | true | false | branch |
---|---|---|---|
62 | 22 | 3 | if ($done = $self->{'done'}) { } |
71 | 33 | 53 | if ($radix > $#$ones) { } |
74 | 22 | 11 | if ($one > $min) |
87 | 10 | 10 | if (++$digits->[$radix] >= $radix) { } |
97 | 40 | 24 | if ($repdigit < $min) |
117 | 2 | 68 | if ($value == 0) |
120 | 31 | 37 | if (_is_infinite($value) or $value != int $value) |
126 | 25 | 61 | if ($ones > $value) |
131 | 10 | 74 | if ($ones == $value) |
136 | 2 | 24 | if ($repdigit == $value) |
139 | 20 | 4 | if ($repdigit > $value) |