Branch Coverage

blib/lib/Mail/Message/Head/ResentGroup.pm
Criterion Covered Total %
branch 26 60 43.3


line true false branch
41 0 6 if $self->orderedFields and not $self->received
49 1 3 if @_ == 1
52 3 0 $from->isa('Mail::Message::Head') ? :
58 12 12 unless $resent_field_names{$name}
60 1 11 if ($name eq 'return-path') { }
0 11 elsif ($name eq 'delivered-to') { }
8 3 elsif (substr($name, 0, 7) eq 'resent-') { }
3 0 elsif ($name eq 'received') { }
63 8 0 if defined $group
70 0 3 if defined $delivered_to
73 1 2 if defined $return_path
86 3 1 @_ ? :
92 85 55 unless $head->get($_)
100 12 15 if (@_ == 1) { }
103 4 11 $resent_field_names{lc $fn} ? :
140 0 0 unless my $received = (shift())->received
141 0 0 unless my $comment = $received->comment
150 0 0 unless my $date = (shift())->date
156 0 1 unless my $from = (shift())->head->get("resent-from")
157 0 1 wantarray ? :
162 0 0 unless my $sender = (shift())->head->get("resent-sender")
163 0 0 wantarray ? :
168 0 0 unless my $to = (shift())->head->get("resent-to")
169 0 0 wantarray ? :
174 0 0 unless my $cc = (shift())->head->get("resent-cc")
175 0 0 wantarray ? :
180 0 0 unless my $bcc = (shift())->head->get("resent-bcc")
181 0 0 wantarray ? :
204 0 0 unless (defined $domain)
206 0 0 if defined $sender