blib/lib/Math/NumSeq/Emirps.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 6 | 8 | 75.0 |
line | true | false | branch |
---|---|---|---|
85 | 0 | 392 | unless my(undef, $prime) = $primes_seq->next |
92 | 100 | 292 | if ($rev != $prime and $self->Math::NumSeq::Primes::pred($rev)) |
103 | 0 | 2007 | if (_is_infinite($value)) |
116 | 2597 | 2 | if ($radix == 10) { } |