Branch Coverage

blib/lib/Crypt/Perl/ECDSA/EC/DB.pm
Criterion Covered Total %
branch 16 20 80.0


line true false branch
69 0 298 unless $translator_cr
85 2144 1416 if substr($key, 0, 4) ne 'OID_'
88 1353 63 if ('SCALAR' eq ref $ns->{$key}) { }
63 0 elsif (*{$ns->{$key};}{'CODE'}) { }
104 0 528 if (not &try(sub { $_->isa('Crypt::Perl::X::ECDSA::NoCurveForOID'); } ))
110 528 888 unless $db_hex_data_hr
113 849 234 if $hex_data{$k} ne $db_hex_data_hr->{$k}
129 0 78 if (defined $hex_data{$k} and $hex_data{$k} ne $db_hex_data_hr->{$k})
169 728 1218 unless $getter_cr
174 721 497 unless $data{'seed'}