| lib/Crypt/Perl/BigInt.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 10 | 70.0 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 16 | 0 | unless (eval { do { 'Crypt::Perl::BigInt'->fffrom_bytes('1234') } }) |
| 26 | 16 | 0 | unless (eval { do { 'Crypt::Perl::BigInt'->new(1234)->aaas_bytes } }) |
| 44 | 0 | 5090 | if $self < 0 |
| 49 | 2178 | 2912 | if (length($hex) % 2) { } |
| 71 | 512 | 409700 | if $bit_from_least >= length $bstr |