| blib/lib/Mail/ListDetector/Detector/Listar.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 23 | 34 | 67.6 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 0 | 40 | if DEBUG() |
| 17 | 0 | 40 | unless defined $message |
| 25 | 19 | 4 | unless (defined $list) |
| 26 | 0 | 19 | if DEBUG() |
| 27 | 1 | 18 | if ($sender =~ /^(\S+?)-owner/) { } |
| 28 | 0 | 1 | if DEBUG() |
| 32 | 0 | 18 | if DEBUG() |
| 33 | 2 | 16 | if ($sender =~ /^(\S+?)-bounce/) { } |
| 34 | 0 | 2 | if DEBUG() |
| 38 | 0 | 16 | if DEBUG() |
| 42 | 7 | 16 | if defined $list |
| 45 | 33 | 7 | unless defined $list |
| 47 | 0 | 7 | if DEBUG() |
| 48 | 0 | 7 | unless 'Email::Valid'->address($list) |
| 49 | 0 | 7 | if DEBUG() |
| 53 | 6 | 1 | unless defined $lv |
| 56 | 0 | 1 | unless defined $listname |