Branch Coverage

blib/lib/Net/SMTP/Verify.pm
Criterion Covered Total %
branch 27 52 51.9


line true false branch
52 0 3 if ($self->debug)
71 0 1 if (grep {$_ eq $host;} @{$self->_known_hosts;})
81 4 1 if (defined $self->host) { }
86 1 0 if ($reply->answer)
92 0 1 if (@known_hosts) { }
98 0 1 @known_hosts ? :
104 0 0 if (my(@rr) = $reply->answer)
119 0 1 unless (defined $port)
126 0 1 unless ($reply->header->ad)
131 0 1 unless ($reply->answer)
147 0 0 if (not $reply->header->ad) { }
0 0 elsif (not $reply->answer) { }
171 0 4 unless (defined $smtp)
177 4 0 defined $smtp->supports('STARTTLS') ? :
180 3 1 if (defined $smtp->supports('PIPELINING')) { }
194 0 1 defined $size && $smtp->supports('SIZE') ? :
199 0 1 unless ($mail_ok)
225 3 0 unless ($mail_sent)
226 0 3 defined $size && $smtp->supports('SIZE') ? :
236 3 0 unless ($mail_sent)
240 1 2 if ($resp != 2)
267 4 8 unless (defined $by_domain->{$domain})
277 0 4 unless (defined $host)
282 4 0 unless (defined $by_host->{$host})
289 0 4 if ($self->tlsa)
296 0 4 if ($self->openpgpkey)