Branch Coverage

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