Branch Coverage

blib/lib/Mail/Message/Head/ListGroup.pm
Criterion Covered Total %
branch 0 92 0.0


line true false branch
26 0 0 if (not defined $address) { }
0 0 elsif (not ref $address && $address->isa('Mail::Message::Field::Address')) { }
31 0 0 unless defined $mi
36 0 0 if defined $args->{'address'}
38 0 0 if defined $args->{'listname'}
39 0 0 if defined $args->{'rfc'}
49 0 0 $from->isa('Mail::Message::Head') ? :
52 0 0 unless $self->collectFields
55 0 0 if (my $communigate = $head->get('X-ListServer')) { }
0 0 elsif (my $mailman = $head->get('X-Mailman-Version')) { }
0 0 elsif (my $majordomo = $head->get('X-Majordomo-Version')) { }
0 0 elsif (my $ecartis = $head->get('X-Ecartis-Version')) { }
0 0 elsif (my $listar = $head->get('X-Listar-Version')) { }
0 0 elsif (defined($field = $head->get('List-Software')) and $field =~ /listbox/i) { }
0 0 elsif ($field = &first(sub { m[LISTSERV-TCP/IP]s; } , $head->get('Received'))) { }
0 0 elsif (defined($field = $head->get('X-Mailing-List')) and $field =~ m[archive/latest]) { }
0 0 elsif (defined($field = $head->get('Mailing-List')) and $field =~ /yahoo/i) { }
0 0 elsif (defined $field and $field =~ /(ezmlm)/i) { }
0 0 elsif (my $fml = $head->get('X-MLServer')) { }
0 0 elsif (defined($field = $head->get('List-Subscribe') || $head->get('List-Unsubscribe')) and $field =~ /sympa/i) { }
0 0 elsif (&first(sub { /majordom/i; } , $head->get('Received'))) { }
0 0 elsif ($field = $head->get('List-ID') && $field =~ /listbox\.com/i) { }
57 0 0 $software =~ /Pro/ ? :
117 0 0 if defined $self->{'MMHL_rfc'}
120 0 0 defined $head->get('List-Id') ? :
0 0 defined $head->get('List-Post') ? :
130 0 0 if exists $self->{'MMHL_address'}
136 0 0 if ($type eq 'Smartlist' and defined($field = $head->get('X-Mailing-List'))) { }
0 0 elsif ($type eq 'YahooGroups') { }
0 0 elsif ($type eq 'Listserv') { }
137 0 0 if $field =~ /\<([^>]+)\>/
145 0 0 if ref $address
147 0 0 if (not defined $address) { }
0 0 elsif (not ref $address) { }
0 0 elsif ($address->isa('Mail::Message::Field::Addresses')) { }
0 0 elsif ($address->isa('Mail::Message::Field::URIs')) { }
155 0 0 defined $address ? :
156 0 0 if ($username =~ s/^owner-|-(owner|bounce|admin)$//i)
163 0 0 defined $uri ? :
179 0 0 if exists $self->{'MMHL_listname'}
188 0 0 if (defined $list) { }
0 0 elsif (my $address = $self->address) { }
230 0 0 if defined $software and $type eq $software
232 0 0 defined $version ? :
0 0 defined $version ? :
0 0 defined $software ? :