Condition Coverage

blib/lib/Crypt/OpenPGP/KeyRing.pm
Criterion Covered Total %
condition 23 28 82.1


and 3 conditions

line !l l&&!r l&&r condition
28 0 0 18 not $ring->{'_data'} and my $file = $param{'Filename'}
71 3 1 1 ref $packet eq "Crypt::OpenPGP::Certificate" and not $packet->is_subkey
127 69 2 2 $pkt->{'__unparsed'} and $pkt->{'type'} == &PGP_PKT_SECRET_KEY() || $pkt->{'type'} == &PGP_PKT_PUBLIC_KEY()
6 33 30 ref $pkt eq "Crypt::OpenPGP::Certificate" and not $pkt->is_subkey
133 4 49 20 not $pkt->{'__unparsed'} and &$test($pkt)
151 120 24 6 ref $packet eq "Crypt::OpenPGP::Certificate" and not $packet->is_subkey

or 2 conditions

line l !l condition
27 0 18 $param{'Data'} || ''
120 24 0 $pkttypes ||= []

or 3 conditions

line l !l&&r !l&&!r condition
127 2 2 0 $pkt->{'type'} == &PGP_PKT_SECRET_KEY() || $pkt->{'type'} == &PGP_PKT_PUBLIC_KEY()
4 34 35 $pkt->{'__unparsed'} and $pkt->{'type'} == &PGP_PKT_SECRET_KEY() || $pkt->{'type'} == &PGP_PKT_PUBLIC_KEY() or ref $pkt eq "Crypt::OpenPGP::Certificate" and not $pkt->is_subkey