| line |
true |
false |
branch |
|
97
|
2 |
0 |
if ($TZ eq '') |
|
131
|
0 |
0 |
if $^W |
|
141
|
1 |
14 |
ref $_[$i] ? : |
|
142
|
0 |
15 |
if ($Mail::Sendmail::mailcfg{'debug'} > 5) |
|
143
|
0 |
0 |
if (length $$data < 500) { } |
|
150
|
0 |
15 |
unless print S $$data |
|
159
|
0 |
7 |
if $Mail::Sendmail::mailcfg{'debug'} > 5 |
|
160
|
0 |
7 |
if (/^[45]/ or not $_) |
|
171
|
0 |
8 |
if ($k =~ /[A-Z]/) |
|
179
|
0 |
0 |
if (not $k and $^W) |
|
194
|
1 |
0 |
if $smtp and $Mail::Sendmail::mailcfg{'smtp'}[0] ne $smtp |
|
217
|
0 |
1 |
unless ($fromaddr =~ /$Mail::Sendmail::address_rx/) |
|
232
|
1 |
0 |
unless ($mail{'Content-Transfer-Encoding'} or $mail{'Content-Type'} =~ /multipart/io) |
|
235
|
1 |
0 |
if ($Mail::Sendmail::mailcfg{'mime'}) { } |
|
241
|
0 |
0 |
if ($mail{'Message'} =~ /[\x80-\xFF]/o) |
|
243
|
0 |
0 |
if $^W |
|
265
|
0 |
1 |
unless (@recipients) |
|
275
|
0 |
1 |
unless (socket S, 2, 1, scalar getprotobyname 'tcp') |
|
279
|
0 |
1 |
if $Mail::Sendmail::mailcfg{'debug'} > 1 |
|
283
|
0 |
1 |
$server =~ s/:(\d+)$//o ? : |
|
287
|
0 |
1 |
unless ($smtpaddr) |
|
298
|
0 |
0 |
if $Mail::Sendmail::mailcfg{'debug'} > 1 |
|
299
|
0 |
0 |
if $Mail::Sendmail::mailcfg{'debug'} > 1 |
|
303
|
1 |
0 |
if ($connected) { } |
|
304
|
0 |
1 |
if $Mail::Sendmail::mailcfg{'debug'} > 3 |
|
309
|
0 |
0 |
if $Mail::Sendmail::mailcfg{'debug'} > 1 |
|
314
|
0 |
1 |
unless ($connected) |
|
329
|
0 |
1 |
unless socket_read() |
|
331
|
0 |
1 |
unless socket_write("HELO $localhost$CRLF") |
|
333
|
0 |
1 |
unless socket_read() |
|
335
|
0 |
1 |
unless socket_write("MAIL FROM: <$fromaddr>$CRLF") |
|
337
|
0 |
1 |
unless socket_read() |
|
341
|
0 |
1 |
unless socket_write("RCPT TO: <$to>$CRLF") |
|
343
|
0 |
1 |
unless socket_read() |
|
350
|
0 |
1 |
unless socket_write("DATA$CRLF") |
|
352
|
0 |
1 |
unless socket_read() |
|
357
|
1 |
7 |
if $header eq 'Message' |
|
359
|
0 |
7 |
unless socket_write("${header}: $mail{$header}$CRLF") |
|
369
|
0 |
1 |
unless socket_write($CRLF, \$mail{'Message'}, "$CRLF.$CRLF") |
|
371
|
0 |
1 |
unless socket_read() |
|
376
|
0 |
1 |
unless socket_write("QUIT$CRLF") |