| line |
true |
false |
branch |
|
19
|
1 |
15 |
unless $source |
|
21
|
7 |
8 |
&Scalar::Util::blessed($source) ? : |
|
26
|
1 |
14 |
unless eval {
do {
$mime->isa('Email::MIME')
}
} |
|
31
|
0 |
13 |
unless $$ct{'type'} eq 'multipart' and $$ct{'subtype'} eq 'report' and $$ct{'attributes'}{'report-type'} eq 'feedback-report' |
|
36
|
1 |
12 |
unless $mime->subparts >= 3 |
|
42
|
0 |
12 |
unless $$report_ct{'type'} eq 'message' and $$report_ct{'subtype'} eq 'feedback-report' |
|
65
|
12 |
12 |
$append_nl ? : |
|
84
|
1 |
1 |
&Scalar::Util::blessed($arg{'original_email'}) ? : |
|
|
2 |
1 |
ref $arg{'original_email'} ? : |
|
97
|
3 |
0 |
ref $arg{'fields'} eq 'HASH' ? : |
|
104
|
3 |
0 |
unless (defined $fields->header('user-agent')) |
|
111
|
3 |
0 |
unless (defined $fields->header('version')) |
|
115
|
3 |
0 |
unless (defined $fields->header('Feedback-Type')) |