| line |
true |
false |
branch |
|
16
|
0 |
7 |
if DEBUG() |
|
17
|
0 |
7 |
unless defined $message |
|
21
|
0 |
7 |
if DEBUG() |
|
22
|
1 |
6 |
unless defined $sender |
|
23
|
0 |
6 |
if DEBUG() |
|
25
|
0 |
6 |
if DEBUG() |
|
28
|
4 |
2 |
unless (defined $list) |
|
29
|
0 |
4 |
if DEBUG() |
|
30
|
1 |
3 |
if ($sender =~ /^(\S+?)-owner/) { } |
|
31
|
0 |
1 |
if DEBUG() |
|
35
|
0 |
3 |
if DEBUG() |
|
39
|
0 |
3 |
unless defined $list |
|
41
|
0 |
3 |
if DEBUG() |
|
42
|
1 |
2 |
if ($list =~ /(majordomo?|domo)\@/) |
|
45
|
0 |
2 |
unless 'Email::Valid'->address($list) |
|
46
|
0 |
2 |
if DEBUG() |
|
50
|
2 |
0 |
unless ($mv = 'Email::Abstract'->get_header($message, 'X-Majordomo-Version')) |
|
55
|
2 |
1 |
if ($received_line =~ /(majordomo?|domo)\@/) |
|
60
|
0 |
2 |
if DEBUG() |
|
61
|
0 |
2 |
unless $majordom |
|
64
|
0 |
2 |
if DEBUG() |
|
66
|
0 |
2 |
if ($mv) { } |
|
72
|
0 |
2 |
if DEBUG() |
|
74
|
0 |
2 |
if DEBUG() |