Branch Coverage

blib/lib/Email/Sender/Transport/SMTP.pm
Criterion Covered Total %
branch 0 58 0.0


line true false branch
51 0 0 if grep {/:/;} $self->hosts
58 0 0 if (exists $arg->{'host'})
60 0 0 if exists $arg->{'hosts'}
161 0 0 unless $localpart =~ /[\x00-\x1F\x7F<>\(\)\[\]\\,;:\@"]/ or $localpart =~ /^\./ or $localpart =~ /\.$/
175 0 0 unless ($smtp)
183 0 0 if ($self->_security eq "starttls")
185 0 0 unless $smtp->starttls(%{$self->ssl_options;})
188 0 0 if ($self->_security eq "maybestarttls")
189 0 0 if ($smtp->supports("STARTTLS", 500, ["Command unknown: 'STARTTLS'"]))
191 0 0 unless $smtp->starttls(%{$self->ssl_options;})
195 0 0 if ($self->sasl_username)
196 0 0 unless defined $self->sasl_password
199 0 0 unless ($smtp->auth($self->sasl_username, $self->sasl_password))
200 0 0 if ($smtp->message =~ /MIME::Base64|Authen::SASL/)
221 0 0 $self->_security eq 'ssl' ? :
0 0 defined $self->helo ? :
0 0 defined $self->localaddr ? :
0 0 defined $self->localport ? :
239 0 0 if defined $_
0 0 unless my(@to) = grep({length $_ if defined $_;} @{$$env{"to"};})
245 0 0 unless $smtp->mail(_quoteaddr($env->{'from'}))
252 0 0 if ($smtp->to(_quoteaddr($addr))) { }
271 0 0 if (@failures and @ok_rcpts == 0 || !$self->allow_partial_success)
275 0 0 if @failures == 1
277 0 0 @ok_rcpts ? :
289 0 0 unless $smtp->data
297 0 0 unless $smtp->datasend($next_hunk)
300 0 0 unless $smtp->dataend
307 0 0 unless @failures