| blib/lib/Mail/DKIM/PublicKey.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 27 | 34 | 79.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 63 | 0 | 0 | 425 | defined $prms{'Protocol'} and $prms{'Protocol'} =~ m[^dns(/txt)?$]s |
| 67 | 0 | 2 | 423 | defined $prms{'Selector'} and length $prms{'Selector'} |
| 70 | 0 | 0 | 423 | defined $prms{'Domain'} and length $prms{'Domain'} |
| 208 | 350 | 1 | 1 | $g eq "" and $empty_g_means_wildcard |
| 229 | 342 | 6 | 1 | length $ends and substr($local_part, -length($ends)) ne $ends |
| line | l | !l | condition |
|---|---|---|---|
| 31 | 0 | 363 | $prms{'Type'} || 'rsa' |
| 73 | 421 | 2 | $callbacks{'Success'} || sub { $_[0]; } |
| 105 | 334 | 26 | $self->get_tag('k') || 'rsa' |
| 400 | 18 | 330 | $self->get_tag('t') || '' |
| 503 | 327 | 17 | $self->get_tag('k') || 'rsa' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 138 | 329 | 4 | 1 | $k eq "rsa" or $k eq "ed25519" |
| 229 | 0 | 2 | 349 | length $local_part < length($begins) + length($ends) or substr($local_part, 0, length $begins) ne $begins |
| 2 | 2 | 347 | length $local_part < length($begins) + length($ends) or substr($local_part, 0, length $begins) ne $begins or length $ends and substr($local_part, -length($ends)) ne $ends |