lib/Crypt/Perl/ECDSA/PrivateKey.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 4 | 6 | 66.6 |
line | true | false | branch |
---|---|---|---|
115 | 0 | 545 | unless (length $key_parts->{'version'}) |
128 | 545 | 0 | if (&try(sub { $key_parts->{$k}->isa('Crypt::Perl::BigInt'); } )) { } |
202 | 42 | 245 | if ($dgst_len > $key_len) |