| line |
true |
false |
branch |
|
224
|
1 |
0 |
if unshift @_, 'Emailesque'->new({}) |
|
240
|
0 |
0 |
if unshift @_, shift(), $name |
|
245
|
0 |
0 |
if unshift @_, shift(), $name |
|
250
|
0 |
0 |
if unshift @_, shift(), $name |
|
255
|
0 |
0 |
if unshift @_, shift(), $name |
|
260
|
0 |
0 |
if unshift @_, shift(), $name |
|
265
|
0 |
0 |
if unshift @_, shift(), $name |
|
270
|
0 |
0 |
if unshift @_, shift(), $name |
|
275
|
0 |
0 |
if unshift @_, shift(), $name |
|
280
|
0 |
0 |
if unshift @_, shift(), $name |
|
285
|
0 |
0 |
if unshift @_, shift(), $name |
|
290
|
0 |
0 |
if unshift @_, shift(), $name |
|
295
|
0 |
0 |
if unshift @_, shift(), $name |
|
300
|
0 |
0 |
if unshift @_, shift(), $name |
|
305
|
0 |
0 |
if unshift @_, shift(), $name |
|
310
|
0 |
0 |
if unshift @_, shift(), $name |
|
315
|
0 |
0 |
if unshift @_, shift(), $name |
|
320
|
0 |
0 |
if unshift @_, shift(), $name |
|
325
|
0 |
0 |
if unshift @_, shift(), $name |
|
330
|
0 |
0 |
if unshift @_, shift(), $name |
|
335
|
0 |
0 |
if unshift @_, shift(), $name |
|
340
|
0 |
0 |
if unshift @_, shift(), $name |
|
345
|
0 |
0 |
if unshift @_, shift(), $name |
|
350
|
0 |
0 |
if unshift @_, shift(), $name |
|
355
|
0 |
0 |
if unshift @_, shift(), $name |
|
360
|
0 |
0 |
if unshift @_, shift(), $name |
|
365
|
0 |
0 |
if unshift @_, shift(), $name |
|
370
|
0 |
0 |
if unshift @_, shift(), $name |
|
375
|
0 |
0 |
if unshift @_, shift(), $name |
|
380
|
0 |
0 |
if unshift @_, shift(), $name |
|
385
|
0 |
0 |
if unshift @_, shift(), $name |
|
390
|
0 |
0 |
if unshift @_, shift(), $name |
|
395
|
0 |
0 |
if unshift @_, shift(), $name |
|
400
|
0 |
0 |
if unshift @_, shift(), $name |
|
405
|
0 |
0 |
if unshift @_, shift(), $name |
|
410
|
0 |
0 |
if unshift @_, shift(), $name |
|
415
|
0 |
0 |
if unshift @_, shift(), $name |
|
420
|
0 |
0 |
if unshift @_, shift(), $name |
|
425
|
0 |
0 |
if unshift @_, shift(), $name |
|
430
|
0 |
0 |
if unshift @_, shift(), $name |
|
435
|
0 |
0 |
if unshift @_, shift(), $name |
|
440
|
0 |
0 |
if unshift @_, shift(), $name |
|
445
|
0 |
0 |
if unshift @_, shift(), $name |
|
450
|
0 |
0 |
if unshift @_, shift(), $name |
|
455
|
0 |
0 |
if unshift @_, shift(), $name |
|
460
|
0 |
0 |
if unshift @_, shift(), $name |
|
465
|
0 |
0 |
if unshift @_, shift(), $name |
|
470
|
0 |
0 |
if unshift @_, shift(), $name |
|
475
|
0 |
0 |
if unshift @_, shift(), $name |
|
480
|
0 |
0 |
if unshift @_, shift(), $name |
|
485
|
0 |
0 |
if unshift @_, shift(), $name |
|
490
|
0 |
0 |
if unshift @_, shift(), $name |
|
495
|
0 |
0 |
if unshift @_, shift(), $name |
|
500
|
0 |
0 |
if unshift @_, shift(), $name |
|
505
|
0 |
0 |
if unshift @_, shift(), $name |
|
510
|
0 |
0 |
if unshift @_, shift(), $name |
|
515
|
0 |
0 |
if unshift @_, shift(), $name |
|
520
|
0 |
0 |
if unshift @_, shift(), $name |
|
525
|
0 |
0 |
if unshift @_, shift(), $name |
|
530
|
0 |
0 |
if unshift @_, shift(), $name |
|
535
|
0 |
0 |
if unshift @_, shift(), $name |
|
540
|
0 |
0 |
if unshift @_, shift(), $name |
|
545
|
0 |
0 |
if unshift @_, shift(), $name |
|
550
|
0 |
0 |
if unshift @_, shift(), $name |
|
555
|
0 |
0 |
if unshift @_, shift(), $name |
|
560
|
0 |
0 |
if unshift @_, shift(), $name |
|
565
|
0 |
0 |
if unshift @_, shift(), $name |
|
570
|
0 |
0 |
if unshift @_, shift(), $name |
|
575
|
0 |
0 |
if unshift @_, shift(), $name |
|
580
|
0 |
0 |
if unshift @_, shift(), $name |
|
585
|
0 |
0 |
if unshift @_, shift(), $name |
|
590
|
0 |
0 |
if unshift @_, shift(), $name |
|
595
|
0 |
0 |
if unshift @_, shift(), $name |
|
600
|
0 |
0 |
if unshift @_, shift(), $name |
|
605
|
0 |
0 |
if unshift @_, shift(), $name |
|
610
|
0 |
0 |
if unshift @_, shift(), $name |
|
615
|
0 |
0 |
if unshift @_, shift(), $name |
|
620
|
0 |
0 |
if unshift @_, shift(), $name |
|
625
|
0 |
0 |
if unshift @_, shift(), $name |
|
630
|
0 |
0 |
if unshift @_, shift(), $name |
|
635
|
0 |
0 |
if unshift @_, shift(), $name |
|
640
|
0 |
0 |
if unshift @_, shift(), $name |
|
645
|
0 |
0 |
if unshift @_, shift(), $name |
|
650
|
0 |
0 |
if unshift @_, shift(), $name |
|
655
|
0 |
0 |
if unshift @_, shift(), $name |
|
660
|
0 |
0 |
if unshift @_, shift(), $name |
|
665
|
0 |
0 |
if unshift @_, shift(), $name |
|
670
|
0 |
0 |
if unshift @_, shift(), $name |
|
675
|
0 |
0 |
if unshift @_, shift(), $name |
|
680
|
0 |
0 |
if unshift @_, shift(), $name |
|
685
|
0 |
0 |
if unshift @_, shift(), $name |
|
690
|
0 |
0 |
if unshift @_, shift(), $name |
|
695
|
0 |
0 |
if unshift @_, shift(), $name |
|
700
|
0 |
0 |
if unshift @_, shift(), $name |
|
705
|
0 |
0 |
if unshift @_, shift(), $name |
|
710
|
0 |
0 |
if unshift @_, shift(), $name |
|
715
|
0 |
0 |
if unshift @_, shift(), $name |
|
720
|
0 |
0 |
if unshift @_, shift(), $name |
|
725
|
0 |
0 |
if unshift @_, shift(), $name |
|
730
|
0 |
0 |
if unshift @_, shift(), $name |
|
735
|
0 |
0 |
if unshift @_, shift(), $name |
|
740
|
0 |
0 |
if unshift @_, shift(), $name |
|
745
|
0 |
0 |
if unshift @_, shift(), $name |
|
750
|
0 |
0 |
if unshift @_, shift(), $name |
|
755
|
0 |
0 |
if unshift @_, shift(), $name |
|
760
|
0 |
0 |
if unshift @_, shift(), $name |
|
765
|
0 |
0 |
if unshift @_, shift(), $name |
|
770
|
0 |
0 |
if unshift @_, shift(), $name |
|
775
|
0 |
0 |
if unshift @_, shift(), $name |
|
780
|
0 |
0 |
if unshift @_, shift(), $name |
|
785
|
0 |
0 |
if unshift @_, shift(), $name |
|
790
|
0 |
0 |
if unshift @_, shift(), $name |
|
795
|
0 |
0 |
if unshift @_, shift(), $name |
|
800
|
0 |
0 |
if unshift @_, shift(), $name |
|
805
|
0 |
0 |
if unshift @_, shift(), $name |
|
810
|
0 |
0 |
if unshift @_, shift(), $name |
|
815
|
0 |
0 |
if unshift @_, shift(), $name |
|
820
|
0 |
0 |
if unshift @_, shift(), $name |
|
825
|
0 |
0 |
if unshift @_, shift(), $name |
|
830
|
0 |
0 |
if unshift @_, shift(), $name |
|
835
|
0 |
0 |
if unshift @_, shift(), $name |
|
840
|
0 |
0 |
if unshift @_, shift(), $name |
|
845
|
0 |
0 |
if unshift @_, shift(), $name |
|
850
|
0 |
0 |
if unshift @_, shift(), $name |
|
855
|
0 |
0 |
if unshift @_, shift(), $name |
|
860
|
0 |
0 |
if unshift @_, shift(), $name |
|
865
|
0 |
0 |
if unshift @_, shift(), $name |
|
870
|
0 |
0 |
if unshift @_, shift(), $name |
|
875
|
0 |
0 |
if unshift @_, shift(), $name |
|
880
|
0 |
0 |
if unshift @_, shift(), $name |
|
885
|
0 |
0 |
if unshift @_, shift(), $name |
|
894
|
0 |
0 |
if @_ |
|
905
|
0 |
6 |
ref $value eq 'ARRAY' ? : |
|
928
|
540 |
9 |
unless my $value = delete $email->{$key} |
|
929
|
9 |
0 |
if $name and not defined $headers->{$name} |
|
934
|
0 |
3 |
unless @required == 3 |
|
955
|
6 |
48 |
if defined $headers->{$key} |
|
959
|
3 |
0 |
if defined $headers->{'Subject'} |
|
962
|
3 |
0 |
if (defined $email->{'message'}) |
|
968
|
0 |
3 |
if $multi |
|
969
|
0 |
3 |
if $multi |
|
972
|
0 |
3 |
if ($type and lc $type eq 'multi' or $html_msg and $text_msg) { } |
|
|
0 |
3 |
elsif ($type and lc $type ne 'multi' and $message) { } |
|
973
|
0 |
0 |
if defined $html_msg |
|
974
|
0 |
0 |
if defined $text_msg |
|
978
|
0 |
0 |
if $type and $type eq 'html' |
|
979
|
0 |
0 |
if $type and $type eq 'text' |
|
987
|
0 |
3 |
unless defined $email->{'message'} |
|
1000
|
0 |
513 |
if defined $headers->{$key} |
|
1004
|
0 |
3 |
if (my $attachments = $email->{'attach'}) |
|
1005
|
0 |
0 |
if (ref $attachments eq 'ARRAY') |
|
1008
|
0 |
0 |
if ($files{$file}) { } |
|
1020
|
0 |
3 |
if (my $attachments = $email->{'files'}) |
|
1021
|
0 |
0 |
if (ref $attachments eq 'ARRAY') |
|
1027
|
3 |
0 |
if @arguments |
|
1028
|
3 |
0 |
if @arguments |
|
1036
|
0 |
0 |
unless $sendmail or $smtpmail |
|
1038
|
0 |
0 |
if ($sendmail) |
|
1041
|
0 |
0 |
if -f '/usr/bin/sendmail' |
|
1042
|
0 |
0 |
if -f '/usr/sbin/sendmail' |
|
1047
|
0 |
0 |
if ($smtpmail) |
|
1066
|
0 |
0 |
if defined $email->{$key} |