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 |