| 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 |
|
37
|
0 |
0 |
if defined $args->{'address'} |
|
39
|
0 |
0 |
if defined $args->{'listname'} |
|
40
|
0 |
0 |
if defined $args->{'rfc'} |
|
50
|
0 |
0 |
$from->isa('Mail::Message::Head') ? : |
|
53
|
0 |
0 |
unless $self->collectFields |
|
56
|
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) { } |
|
58
|
0 |
0 |
$software =~ /Pro/ ? : |
|
118
|
0 |
0 |
if defined $self->{'MMHL_rfc'} |
|
121
|
0 |
0 |
defined $head->get('List-Id') ? : |
|
|
0 |
0 |
defined $head->get('List-Post') ? : |
|
131
|
0 |
0 |
if exists $self->{'MMHL_address'} |
|
137
|
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') { } |
|
138
|
0 |
0 |
if $field =~ /\<([^>]+)\>/ |
|
146
|
0 |
0 |
if ref $address |
|
148
|
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')) { } |
|
156
|
0 |
0 |
defined $address ? : |
|
157
|
0 |
0 |
if ($username =~ s/^owner-|-(owner|bounce|admin)$//i) |
|
164
|
0 |
0 |
defined $uri ? : |
|
180
|
0 |
0 |
if exists $self->{'MMHL_listname'} |
|
189
|
0 |
0 |
if (defined $list) { } |
|
|
0 |
0 |
elsif (my $address = $self->address) { } |
|
231
|
0 |
0 |
if defined $software and $type eq $software |
|
233
|
0 |
0 |
defined $version ? : |
|
|
0 |
0 |
defined $version ? : |
|
|
0 |
0 |
defined $software ? : |