| blib/lib/Mail/Message/Construct/Read.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 16 | 93.7 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 3 | 4 | if (not $ref) { } |
| 1 | 3 | elsif ($ref eq 'SCALAR') { } | |
| 1 | 2 | elsif ($ref eq 'ARRAY') { } | |
| 1 | 1 | elsif ($ref eq 'GLOB') { } | |
| 1 | 0 | elsif ($ref and $from->isa('IO::Handle')) { } | |
| 56 | 1 | 6 | exists $args{'strip_status_fields'} ? : |
| 74 | 6 | 1 | unless $head->get("Message-ID") |
| 77 | 6 | 1 | if $strip_status |