| line |
true |
false |
branch |
|
69
|
0 |
300 |
unless $translator_cr |
|
85
|
2368 |
1589 |
if substr($key, 0, 4) ne "OID_" |
|
88
|
1519 |
70 |
if ('SCALAR' eq ref $ns->{$key}) { } |
|
|
70 |
0 |
elsif (*{$ns->{$key};}{'CODE'}) { } |
|
104
|
0 |
592 |
if (not &try(sub {
$_->isa("Crypt::Perl::X::ECDSA::NoCurveForOID");
}
)) |
|
110
|
592 |
997 |
unless $db_hex_data_hr |
|
113
|
954 |
258 |
if $hex_data{$k} ne $db_hex_data_hr->{$k} |
|
129
|
0 |
86 |
if (defined $hex_data{$k} and $hex_data{$k} ne $db_hex_data_hr->{$k}) |
|
169
|
792 |
1342 |
unless $getter_cr |
|
174
|
785 |
557 |
unless $data{'seed'} |