| line |
true |
false |
branch |
|
51
|
0 |
0 |
if ref $this |
|
57
|
0 |
0 |
unless (defined $args{'smtp'}) |
|
58
|
0 |
0 |
unless ($args{'port'} =~ /^\d+$/) |
|
59
|
0 |
0 |
unless ($args{'timeout'} =~ /^\d+$/) |
|
71
|
0 |
0 |
UNIVERSAL::isa($_[0], 'Mail::SendEasy') ? : |
|
83
|
0 |
0 |
unless $k =~ /^(?:pass)$/ |
|
85
|
0 |
0 |
unless (ref $v or $k =~ /^(?:msg|message|html|msghtml)$/) |
|
92
|
0 |
0 |
if (not defined $mail{'msg'} and defined $mail{'message'}) |
|
93
|
0 |
0 |
if (not defined $mail{'html'} and defined $mail{'msghtml'}) |
|
94
|
0 |
0 |
if (not defined $mail{'anex'} and defined $mail{'attach'}) |
|
96
|
0 |
0 |
unless (defined $mail{'from'}) |
|
97
|
0 |
0 |
unless (defined $mail{'to'}) |
|
99
|
0 |
0 |
unless ($SMTP) |
|
100
|
0 |
0 |
unless (defined $mail{'smtp'}) |
|
101
|
0 |
0 |
unless ($mail{'port'} =~ /^\d+$/) |
|
102
|
0 |
0 |
unless ($mail{'timeout'} =~ /^\d+$/) |
|
104
|
0 |
0 |
unless $SMTP |
|
107
|
0 |
0 |
unless ($SMTP) |
|
111
|
0 |
0 |
if $ER |
|
112
|
0 |
0 |
if ($#from > 0) |
|
115
|
0 |
0 |
if $ER |
|
118
|
0 |
0 |
if (defined $mail{'cc'}) |
|
119
|
0 |
0 |
if $ER |
|
123
|
0 |
0 |
if (defined $mail{'reply'}) |
|
124
|
0 |
0 |
if $ER |
|
125
|
0 |
0 |
if $mail{'reply'} eq '' |
|
128
|
0 |
0 |
if (defined $mail{'error'}) |
|
129
|
0 |
0 |
if $ER |
|
130
|
0 |
0 |
if $mail{'error'} eq '' |
|
136
|
0 |
0 |
if (defined $mail{'anex'}) |
|
138
|
0 |
0 |
if ref $mail{'anex'} eq 'ARRAY' |
|
142
|
0 |
0 |
if ($anex_i eq '') |
|
144
|
0 |
0 |
unless (-e $anex_i) |
|
145
|
0 |
0 |
if (-d $anex_i) |
|
151
|
0 |
0 |
if ($ARCHZIP_PM and $mail{'zipanex'}) { } |
|
179
|
0 |
0 |
if @anex_part |
|
190
|
0 |
0 |
if ($mail{'fromtitle'} =~ /\S/s) |
|
197
|
0 |
0 |
if $title ne '' |
|
201
|
0 |
0 |
if $mail{'cc'} |
|
203
|
0 |
0 |
if $mail{'reply'} |
|
204
|
0 |
0 |
if $mail{'error'} |
|
206
|
0 |
0 |
if $mail{'subject'} |
|
213
|
0 |
0 |
if (defined $mail{'msg'}) |
|
215
|
0 |
0 |
unless ($mail{'msg'} =~ /\n\n$/s) |
|
226
|
0 |
0 |
if (defined $mail{'html'}) |
|
243
|
0 |
0 |
if ($#{$mail{'MIME'}{'part'};} == 1) { } |
|
259
|
0 |
0 |
if ($mail{'anex'}) { } |
|
280
|
0 |
0 |
if ($$SMTP{'USER'} ne '' || $$SMTP{'PASS'} ne '' and $SMTP->auth_types) |
|
281
|
0 |
0 |
unless ($SMTP->auth) |
|
284
|
0 |
0 |
unless ($SMTP->MAIL("FROM:<$mail{'from'}>") =~ /^2/) |
|
287
|
0 |
0 |
unless ($SMTP->RCPT("TO:<$to>") =~ /^2/) |
|
292
|
0 |
0 |
unless ($SMTP->RCPT("TO:<$to>") =~ /^2/) |
|
295
|
0 |
0 |
if ($SMTP->DATA =~ /^3/) { } |
|
297
|
0 |
0 |
unless ($SMTP->DATAEND =~ /^2/) |
|
326
|
0 |
0 |
unless (defined $mail{'MIME'}{$order_i}) |
|
342
|
0 |
0 |
unless (ref $part) |
|
343
|
0 |
0 |
if $boudary |
|
345
|
0 |
0 |
if $boudary |
|
355
|
0 |
0 |
if $boudary |
|
358
|
0 |
0 |
unless (defined $$part{$order_i}) |
|
365
|
0 |
0 |
if $boudary |
|
428
|
0 |
0 |
if ref $_[0] eq 'ARRAY' |
|
432
|
0 |
0 |
if ($mails_i eq '') |
|
433
|
0 |
0 |
unless (&_format($mails_i)) |
|
443
|
0 |
0 |
if ($_[0] eq '') |
|
449
|
0 |
0 |
if (not $mail =~ /^[\w\.-]+\@localhost$/sig) { } |
|
|
0 |
0 |
elsif (not $mail =~ /^[\w\.-]+\@[\w-]+$/) { } |
|
450
|
0 |
0 |
unless ($mail =~ /^[\w\.-]+\@(?:[\w-]+\.)*?(?:\w+(?:-\w+)*)(?:\.\w+)+$/) |
|
454
|
0 |
0 |
if $stat |
|
473
|
0 |
0 |
if ($TZ eq '') |
|
496
|
0 |
0 |
if (ref $file eq 'SCALAR') |
|
499
|
0 |
0 |
if (ref $fh ne 'GLOB') |
|
501
|
0 |
0 |
if (*{$fh;}->{'DATA'} and *{$fh;}->{'content'} ne '') |
|
504
|
0 |
0 |
unless *{$fh;}->{'DATA'} |
|
522
|
0 |
0 |
UNIVERSAL::isa($_[0], 'Mail::SendEasy') ? : |
|
533
|
0 |
0 |
unless ($zip_name =~ /\.zip$/i) |
|
549
|
0 |
0 |
if ($def_name and $#_ == 0) |