| line |
true |
false |
branch |
|
106
|
0 |
0 |
unless $args{'Hello'} |
|
109
|
0 |
0 |
unless $args{'sock'} = 'IO::Socket::INET'->new('PeerAddr', $host, 'PeerPort', $args{'Port'} || 25, 'Proto', 'tcp', 'Timeout', $args{'Timeout'} || 5) |
|
119
|
0 |
0 |
unless ($rsp == 220) |
|
123
|
0 |
0 |
unless $args{'NoTLS'} |
|
124
|
0 |
0 |
if $$me{'User'} and $$me{'Password'} |
|
154
|
0 |
0 |
unless ($num == 250) |
|
178
|
0 |
0 |
unless ($num == 220) |
|
181
|
0 |
0 |
unless (IO::Socket::SSL::socket_to_SSL($$me{'sock'}, 'SSL_version', 'SSLv3 TLSv1')) |
|
193
|
0 |
0 |
unless ($type) |
|
196
|
0 |
0 |
if ($type =~ /CRAM\-MD5/) { } |
|
|
0 |
0 |
elsif ($type =~ /LOGIN/) { } |
|
|
0 |
0 |
elsif ($type =~ /PLAIN/) { } |
|
213
|
0 |
0 |
unless ($num == 334) |
|
218
|
0 |
0 |
unless ($num == 334) |
|
223
|
0 |
0 |
if (not $num == 235) |
|
235
|
0 |
0 |
unless ($num == 334) |
|
238
|
0 |
0 |
unless my $ticket = decode_base64 $txt |
|
244
|
0 |
0 |
if (not $num == 235) |
|
257
|
0 |
0 |
if (not $num == 235) |
|
264
|
0 |
0 |
unless defined $addr |
|
266
|
0 |
0 |
if $addr =~ /(<[^>]*>)/ |
|
278
|
0 |
0 |
if (not $num == 250) |
|
294
|
0 |
0 |
unless ($num == 250) |
|
315
|
0 |
0 |
if (not $num == 354) |
|
323
|
0 |
0 |
@_ == 1 && ref $_[0] ? : |
|
326
|
0 |
0 |
unless defined fileno $$cmd{'sock'} |
|
329
|
0 |
0 |
unless defined $last_ch |
|
331
|
0 |
0 |
unless length $line |
|
337
|
0 |
0 |
if ($last_ch eq "\r") { } |
|
|
0 |
0 |
elsif ($last_ch eq "\n") { } |
|
338
|
0 |
0 |
if $line =~ s/^\012// |
|
341
|
0 |
0 |
if $line =~ /^\./ |
|
356
|
0 |
0 |
unless $^O eq 'MacOS' |
|
361
|
0 |
0 |
if (select(undef, $wout = $win, undef, $timeout) > 0 or -f $$cmd{'sock'}) { } |
|
364
|
0 |
0 |
unless (defined $w) |
|
386
|
0 |
0 |
if (not $num == 250) |
|
396
|
0 |
0 |
if (not $num == 221) |