| 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) { } |