blib/lib/Encode/Positive/Digits.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 20 | 65.0 |
line | true | false | branch |
---|---|---|---|
22 | 0 | 387 | unless $number =~ /\A\d+\Z/s |
26 | 0 | 387 | unless $b > 1 |
29 | 3 | 384 | if $number == 0 |
36 | 2284 | 384 | if $p < $n |
37 | 12 | 372 | if $p == $n |
53 | 0 | 259 | unless $b > 1 |
62 | 0 | 2025 | if $i < 0 |
180 | 0 | 1 | if eval "eof(${p}::DATA)" |
182 | 0 | 1 | if $@ |
184 | 0 | 1 | if $@ |