line |
true |
false |
branch |
46
|
0 |
26 |
if ref $class |
105
|
0 |
26 |
if $self->debug |
108
|
10 |
16 |
if ($self->parameter('Alias')) { } |
125
|
0 |
26 |
if $self->debug |
132
|
0 |
5 |
if $self->debug |
142
|
0 |
21 |
if $self->debug |
157
|
0 |
42 |
if (defined $self->parameter($opt)) |
183
|
0 |
18 |
if $self->debug |
212
|
0 |
3 |
if $self->debug |
229
|
0 |
194 |
if $self->debug |
234
|
45 |
149 |
if ($self->parameter('TransactionLog')) |
241
|
123 |
71 |
if ($input =~ /
^(\d{3}) # first 3 digits
\s+
(.*)$ # SMTP message corresponding to the SMTP code
/ox or $input =~ /
^(\d{3})
\s*$ # in case there's no status message ...
/ox) { } |
|
71 |
0 |
elsif ($input =~ /
# these lines are advertising SMTP capabilities
^(\d{3}) # 3 digits
\- # separator
(.*)$ # capability
/ox) { } |
256
|
17 |
106 |
unless (defined $smtp_string) |
262
|
0 |
123 |
unless (defined $smtp_code) |
266
|
118 |
5 |
if ($smtp_code =~ /^(1|2|3)\d{2}$/) { } |
|
4 |
1 |
elsif ($smtp_code =~ /
^(4|5)\d{2}$ # look for error codes (starting with 4 or 5)
/ox) { } |
272
|
22 |
96 |
if (not defined $to_send) { } |
276
|
12 |
10 |
unless ($self->parameter('message_sent')) |
277
|
0 |
12 |
if $self->debug |
293
|
0 |
96 |
if $self->debug |
294
|
21 |
75 |
if ($self->parameter('TransactionLog')) |
306
|
0 |
4 |
if $self->debug |
319
|
0 |
1 |
if $self->debug |
334
|
0 |
71 |
if ($self->parameter('Debug') > 1) |
339
|
0 |
0 |
if $self->debug |
351
|
0 |
0 |
if $self->debug |
360
|
0 |
2 |
if $self->debug |
369
|
0 |
15 |
if $self->debug |
376
|
3 |
12 |
if (ref $value eq 'ARRAY') { } |
385
|
14 |
1 |
unless ($self->parameter('message_sent')) |
386
|
0 |
14 |
if $self->debug |
404
|
0 |
37 |
if $self->debug |
410
|
21 |
16 |
if ($self->parameter('Alias')) { } |
475
|
251 |
217 |
if (exists $$parameters{$parameter}) { } |
495
|
0 |
1879 |
unless ref $self |
496
|
0 |
1879 |
unless defined $parameter |
498
|
101 |
1778 |
if (defined $value) |
509
|
0 |
21 |
unless ref $self |
510
|
21 |
0 |
if (defined $wheel) |
520
|
0 |
37 |
unless ref $self |
521
|
0 |
37 |
if (defined $wheel) { } |
533
|
0 |
114 |
unless ref $self |
535
|
18 |
96 |
if (defined $wheel) { } |
546
|
0 |
114 |
unless (defined $ret) |
556
|
0 |
37 |
unless ref $self |
557
|
0 |
37 |
if (defined $wheel) { } |
569
|
0 |
4 |
unless ref $self |
570
|
4 |
0 |
if (defined $wheel) |
578
|
0 |
37 |
unless ref $self |
579
|
0 |
37 |
if (defined $wheel) { } |
590
|
0 |
233 |
unless ref $self |
591
|
39 |
194 |
if (defined $alarm) { } |
604
|
0 |
0 |
unless ref $self |
614
|
0 |
26 |
unless ref $self |
616
|
0 |
26 |
if $self->debug |
626
|
7 |
19 |
if (defined $self->parameter('Auth')->{'mechanism'}) |
636
|
0 |
26 |
if (ref(${$rcpt_to;}) =~ /SCALAR/io) { } |
|
16 |
10 |
elsif (ref(${$rcpt_to;}) =~ /ARRAY/io) { } |
659
|
4 |
22 |
if (defined $self->parameter('MessageFile') or defined $self->parameter('FileHandle')) { } |
675
|
0 |
4 |
if $self->debug |
677
|
3 |
1 |
if (not defined $self->parameter('FileHandle')) { } |
684
|
0 |
4 |
unless (defined $handle) |
687
|
0 |
0 |
if $self->debug |
698
|
4 |
0 |
if (defined $self->parameter('Body')) |
717
|
0 |
4 |
if $self->debug |
727
|
0 |
4 |
if $self->debug |
728
|
0 |
4 |
if ($self->debug > 1) |
736
|
4 |
0 |
if ($errnum == 0) { } |
768
|
0 |
118 |
unless ref $self |
780
|
0 |
26 |
unless ref $self |
782
|
0 |
26 |
if $self->debug |
787
|
7 |
19 |
if (defined $mechanism) { } |
788
|
5 |
2 |
if ($self->_is_auth_supported_by_poco($mechanism)) { } |
791
|
2 |
3 |
if (defined $user and defined $pass) { } |
831
|
16 |
10 |
if (ref(${$rcpt_to;}) =~ /ARRAY/io) { } |
|
0 |
10 |
elsif (ref(${$rcpt_to;}) =~ /SCALAR/io) { } |
845
|
22 |
4 |
if (not $self->parameter('MessageFile') || $self->parameter('FileHandle')) { } |
873
|
0 |
542 |
unless ref $self |
874
|
0 |
542 |
if (defined $debug_level) |
883
|
5 |
2 |
if (uc $requested_mehtod eq $mechanism) |
895
|
2 |
0 |
if ($mechanism eq 'PLAIN') { } |
897
|
0 |
2 |
if ($@) { } |
919
|
3 |
0 |
if (-e $filename and -r $filename) { } |
934
|
0 |
92 |
unless ref $self |
936
|
66 |
26 |
if (defined $log) { } |