Branch Coverage

blib/lib/Emailesque.pm
Criterion Covered Total %
branch 20 324 6.1


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
954 6 45 if defined $headers->{$key}
958 3 0 if defined $headers->{'Subject'}
961 3 0 if (defined $email->{'message'})
967 0 3 if $multi
968 0 3 if $multi
971 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) { }
972 0 0 if defined $html_msg
973 0 0 if defined $text_msg
977 0 0 if $type and $type eq 'html'
978 0 0 if $type and $type eq 'text'
986 0 3 unless defined $email->{'message'}
999 0 516 if defined $headers->{$key}
1003 0 3 if (my $attachments = $email->{'attach'})
1004 0 0 if (ref $attachments eq 'ARRAY')
1007 0 0 if ($files{$file}) { }
1019 0 3 if (my $attachments = $email->{'files'})
1020 0 0 if (ref $attachments eq 'ARRAY')
1026 3 0 if @arguments
1027 3 0 if @arguments
1035 0 0 unless $sendmail or $smtpmail
1037 0 0 if ($sendmail)
1040 0 0 if -f '/usr/bin/sendmail'
1041 0 0 if -f '/usr/sbin/sendmail'
1046 0 0 if ($smtpmail)
1065 0 0 if defined $email->{$key}