line |
true |
false |
branch |
53
|
1 |
15 |
unless $source |
55
|
7 |
8 |
&Scalar::Util::blessed($source) ? : |
60
|
1 |
14 |
unless eval {
do {
$mime->isa('Email::MIME')
}
} |
68
|
0 |
13 |
unless $ct->{'type'} eq 'multipart' and $ct->{'subtype'} eq 'report' and $ct->{'attributes'}{'report-type'} eq 'feedback-report' |
70
|
1 |
12 |
unless $mime->subparts >= 3 |
78
|
0 |
12 |
unless $report_ct->{'type'} eq 'message' and $report_ct->{'subtype'} eq 'feedback-report' |
99
|
12 |
12 |
$append_nl ? : |
146
|
1 |
1 |
&Scalar::Util::blessed($arg{'original_email'}) ? : |
|
2 |
1 |
ref $arg{'original_email'} ? : |
159
|
3 |
0 |
ref $arg{'fields'} eq 'HASH' ? : |
165
|
3 |
0 |
unless (defined $fields->header('user-agent')) |
172
|
3 |
0 |
unless (defined $fields->header('version')) |
176
|
3 |
0 |
unless (defined $fields->header('Feedback-Type')) |