| blib/lib/Mail/RBL.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 24 | 58.3 |
| line | true | false | branch |
|---|---|---|---|
| 67 | 20 | 0 | defined $suffix ? : |
| 104 | 0 | 14 | unless length $host |
| 108 | 4 | 10 | if (my $val = $self->_do_check($addr)) |
| 110 | 2 | 2 | if (wantarray) { } |
| 141 | 0 | 32 | unless length $host |
| 144 | 0 | 32 | if (my $val = $self->_do_check($host)) |
| 146 | 0 | 0 | if (wantarray) { } |
| 167 | 2 | 0 | if ($q) |
| 171 | 0 | 2 | unless $rr->class eq 'IN' and $rr->type eq 'TXT' |
| 186 | 4 | 42 | if ($q) |
| 190 | 0 | 4 | unless $rr->class eq 'IN' and $rr->type eq 'A' |
| 202 | 14 | 0 | if ($host =~ /^\d+\.\d+\.\d+\.\d+$/) { } |