| line |
true |
false |
branch |
|
34
|
0 |
0 |
if (@_ % 2) { } |
|
43
|
0 |
0 |
if ($ssl =~ /ssl/i) |
|
47
|
0 |
0 |
defined $host ? : |
|
58
|
0 |
0 |
defined $_args{'Timeout'} ? : |
|
60
|
0 |
0 |
ref $hosts ? : |
|
69
|
0 |
0 |
if $obj = $type->SUPER::new(%_args) |
|
76
|
0 |
0 |
unless defined $obj |
|
80
|
0 |
0 |
exists $arg{'Debug'} ? : |
|
85
|
0 |
0 |
if (defined $ssl and $ssl =~ /ssl/i) |
|
87
|
0 |
0 |
unless ($obj->ssl_start) |
|
94
|
0 |
0 |
unless ($obj->response == 2) |
|
105
|
0 |
0 |
unless ($obj->hello($arg{'Hello'} || '')) |
|
111
|
0 |
0 |
if (defined $ssl and $ssl =~ /starttls/i and defined $obj->supports('STARTTLS')) |
|
113
|
0 |
0 |
unless ($obj->starttls) |
|
130
|
0 |
0 |
unless (eval {
do {
require IO::Socket::SSL
}
}) |
|
136
|
0 |
0 |
exists $arg{'Debug'} ? : |
|
137
|
0 |
0 |
exists $arg{'Debug_SSL'} ? : |
|
141
|
0 |
0 |
unless unshift @Net::SMTPS::ISA, 'IO::Socket::SSL' and 'IO::Socket::SSL'->start_SSL($self, %ssl_args, @_) and $self->isa('IO::Socket::SSL') and bless $self, $type |
|
153
|
0 |
0 |
unless ($self->_STARTTLS and $self->ssl_start(@_)) |
|
165
|
0 |
0 |
if ($mech) |
|
166
|
0 |
0 |
if $self->debug |
|
170
|
0 |
0 |
if (exists do {
*$self
}->{'net_smtp_esmtp'}{'AUTH'}) |
|
172
|
0 |
0 |
if $self->debug |
|
175
|
0 |
0 |
if (index($sv, $i) >= 0 and not grep(/$i/i, @matched)) |
|
180
|
0 |
0 |
if (@matched) |
|
184
|
0 |
0 |
if $self->debug |