| line |
true |
false |
branch |
|
20
|
0 |
2 |
unless eval {
do {
return [] unless $query = $self->get_resolver->send($domain, "MX")
}
} |
|
21
|
0 |
2 |
unless $query = $self->get_resolver->send($domain, "MX") |
|
24
|
0 |
2 |
unless ($query) |
|
31
|
0 |
2 |
if $rr->type ne "MX" |
|
33
|
0 |
2 |
if $self->verbose |
|
35
|
0 |
2 |
if ($self->verbose) |
|
43
|
0 |
1 |
unless my $email = shift() |
|
51
|
0 |
1 |
if $self->verbose |
|
62
|
0 |
6 |
if ($us eq "example.com") |
|
75
|
10 |
0 |
unless "pass" eq $_->{'row'}{'policy_evaluated'}{'dkim'} |
|
78
|
10 |
0 |
if "pass" ne $_->{'row'}{'policy_evaluated'}{'dkim'} |
|
81
|
0 |
6 |
unless my $from = $$agg_ref->{'policy_published'}{'domain'} |
|
118
|
0 |
0 |
unless my(@parts) = "Email::MIME"->create("attributes", {"content_type", "text/plain", "disposition", "inline", "charset", "US-ASCII"}, "body", $body) |
|
130
|
0 |
0 |
unless my $email = "Email::MIME"->create("header_str", ["From", $self->config->{'organization'}{'email'}, "To", $to, "Date", $self->get_timestamp_rfc2822, "Subject", "DMARC too big report"], "parts", [@parts]) |
|
147
|
5 |
0 |
$cf eq 'gzip' ? : |
|
149
|
0 |
5 |
unless my(@parts) = "Email::MIME"->create("attributes", {"content_type", "text/plain", "disposition", "inline", "charset", "US-ASCII"}, "body", $self->human_summary($agg_ref)) |
|
158
|
0 |
5 |
unless push @parts, "Email::MIME"->create("attributes", {"filename", $filename, "content_type", "application/$cf", "encoding", "base64", "name", $filename}, "body", $shrunk) |
|
172
|
0 |
5 |
unless my $email = "Email::MIME"->create("header_str", ["From", $self->config->{'organization'}{'email'}, "To", $to, "Date", $self->get_timestamp_rfc2822, "Subject", $self->get_subject($agg_ref)], "parts", [@parts]) |
|
184
|
0 |
7 |
scalar @args ? : |
|
195
|
0 |
1 |
if $host and $host ne "mail.example.com" |