| blib/lib/Email/Sender/Transport/Redirect/Recipients.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 21 | 24 | 87.5 |
| line | true | false | branch |
|---|---|---|---|
| 65 | 1 | 8 | unless @args == 1 |
| 67 | 6 | 2 | if (my $kind = ref $arg) { } |
| 68 | 5 | 1 | if ($kind eq 'HASH') |
| 71 | 1 | 9 | unless $k eq 'to' or $k eq 'exclude' |
| 88 | 3 | 3 | if ($exclusion =~ /\*/) { } |
| 3 | 0 | elsif (my $address = 'Email::Valid'->address($exclusion)) { } | |
| 92 | 3 | 6 | $1 eq '*' ? : |
| 0 | 9 | $1 eq '?' ? : | |
| 112 | 20 | 1 | if ($mail) |
| 113 | 18 | 2 | if (my(@exclusions) = @{$self->excludes_regexps;}) |
| 115 | 18 | 0 | if (my $address = 'Email::Valid'->address($mail)) |
| 119 | 12 | 12 | if ($real =~ /\A$re\z/) |