| blib/lib/Mail/GnuPG.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 13 | 33 | 39.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 132 | 0 | 0 | 2 | ref $message and $message->isa('MIME::Entity') |
| 204 | 0 | 2 | 0 | $armor_message and $plaintext[0] |
| 0 | 0 | 2 | $armor_message and $plaintext[0] and not $plaintext[0] =~ /^[\w-]+:/ | |
| 244 | 0 | 0 | 0 | ref $message and $message->isa('MIME::Entity') |
| 378 | 0 | 0 | 4 | ref $message and $message->isa('MIME::Entity') |
| 383 | 0 | 0 | 2 | $message->bodyhandle and $message->bodyhandle->as_string =~ /^-----BEGIN PGP SIGNED MESSAGE-----/m |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 56 | 0 | 5 | 0 | ref $proto || $proto |
| 330 | 0 | 0 | 0 | not $gpg_out =~ /\S/ or $? |
| 975 | 1 | 1 | 1 | $entity->effective_type =~ m[multipart/signed] or $entity->as_string =~ /^-----BEGIN PGP SIGNED MESSAGE-----/m |
| 984 | 0 | 1 | 2 | $entity->effective_type =~ m[multipart/encrypted] or $entity->as_string =~ /^-----BEGIN PGP MESSAGE-----/m |
| 1036 | 575 | 0 | 9 | $reader->handles or $writer->handles |