line |
true |
false |
branch |
20
|
1 |
9 |
unless my($args) = @_ |
21
|
1 |
8 |
unless ref $args eq 'HASH' |
27
|
1 |
7 |
if ($$args{'email'}) { } |
30
|
7 |
0 |
ref $$config{'headers'} eq 'HASH' ? : |
|
1 |
6 |
ref $$args{'headers'} eq 'HASH' ? : |
|
4 |
3 |
ref $$args{'to'} eq 'ARRAY' ? : |
34
|
0 |
8 |
unless $email |
37
|
1 |
7 |
unless $$params{'from'} = $$args{'envelope-from'} or $email->get_header('from') |
38
|
2 |
5 |
unless $$params{'to'} = $$args{'envelope-to'} or $email->get_header('to') |
40
|
0 |
5 |
if (blessed($$args{'transport'})) { } |
|
4 |
1 |
elsif (not defined $$args{'transport'} and blessed($$config{'transport'})) { } |
45
|
0 |
1 |
ref $$config{'transport'} eq 'HASH' ? : |
|
1 |
0 |
ref $$args{'transport'} eq 'HASH' ? : |
46
|
1 |
0 |
if (my $choice = delete $$transport{'class'}) |