Branch Coverage

blib/lib/Mail/ListDetector/Detector/Mailman.pm
Criterion Covered Total %
branch 25 48 52.0


line true false branch
15 0 46 if DEBUG()
16 0 46 unless defined $message
19 4 42 if defined $version
20 42 4 if (not defined $version or $version =~ /^\s*$/)
21 0 42 if DEBUG()
24 0 4 if DEBUG(my $list)
30 0 4 if DEBUG() and defined $sender
34 2 2 if (defined $sender) { }
36 2 0 if ($sender =~ /^(([^\@]+)-(admin|owner|bounces)(?:\+[^\@]+)?\@(\S+))$/) { }
0 0 elsif ($sender =~ /^((admin|owner)-([^\@]+)\@(\S+))$/) { }
37 0 2 if DEBUG()
39 0 2 if DEBUG()
41 0 2 if DEBUG()
45 0 0 if DEBUG()
46 0 0 if DEBUG()
51 0 2 unless defined $beenthere
52 0 2 if DEBUG()
55 2 0 if ($beenthere =~ /^([^\@]+)\@/)
62 2 2 if (defined $list_post) { }
63 0 2 if DEBUG()
64 2 0 if ($list_post =~ /^\]*)\>$/)
66 0 2 if DEBUG()
70 0 2 if DEBUG()
74 0 4 if DEBUG()