Branch Coverage

blib/lib/MailX/Qmail/Queue/Message.pm
Criterion Covered Total %
branch 0 14 0.0


line true false branch
18 0 0 if exists $header{$self}
19 0 0 unless open my $fh, '<', $self->body_ref
28 0 0 unless my $from = $self->header->get('From')
35 0 0 unless my $received = $header->get('Received')
36 0 0 unless $received =~ /^from .*? \(HELO (.*?)\) /u or $received =~ /^from (\S+) \(/u
51 0 0 unless exists $body{$self}
52 0 0 if ref $header and $header->can('as_string')