| 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")) |