blib/lib/Crypt/OpenPGP/KeyBlock.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 14 | 57.1 |
line | true | false | branch |
---|---|---|---|
8 | 43 | 0 | $_[0]{'pkt'}{'Crypt::OpenPGP::UserID'} ? : |
17 | 0 | 27 | unless $keys and @$keys |
19 | 27 | 24 | if $key->can_encrypt |
26 | 0 | 11 | unless $keys and @$keys |
28 | 11 | 0 | if $key->can_sign |
33 | 0 | 0 | unless $_[0]{'keys_by_id'}{$_[1]} |
54 | 39 | 61 | if (ref $pkt eq 'Crypt::OpenPGP::Certificate') |