| blib/lib/Mail/Message/Construct/Read.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 16 | 93.7 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 8 | 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')) { } | |
| 58 | 2 | 10 | exists $args{'strip_status_fields'} ? : |
| 75 | 11 | 1 | unless $head->get("Message-ID") |
| 78 | 10 | 2 | if $strip_status |