blib/lib/Integer/Tiny.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 18 | 18 | 100.0 |
line | true | false | branch |
---|---|---|---|
16 | 1 | 7 | unless defined $alphabet |
17 | 1 | 6 | unless length $alphabet >= 2 |
24 | 1 | 5 | unless int keys %chars_to_positions == $length_of_alphabet |
40 | 1 | 7 | unless defined $value |
42 | 1 | 6 | if (ref $value eq 'Math::BigInt') { } |
5 | 1 | elsif ($value =~ /^\d+$/) { } | |
68 | 1 | 8 | unless defined $encrypted |
69 | 1 | 7 | unless length $encrypted |
75 | 1 | 6 | if grep {not defined $$self{'c2p'}{$_};} @chars |