Branch Coverage

blib/lib/Mail/MtPolicyd/Plugin/DBL.pm
Criterion Covered Total %
branch 17 26 65.3


line true false branch
50 1 4 if ($enabled eq 'off')
56 0 9 unless (defined $hostname)
62 4 5 unless (defined $ip_result)
67 5 0 defined $info ? :
71 5 0 if (defined $self->$score_attr and not $r->is_already_done($self->name . '-' . $check . '-score'))
77 2 3 if ($mode eq 'reject')
91 0 9 unless (defined $value)
95 0 9 if ($value eq 'unknown' or $value eq '')
99 0 9 if ($value =~ /^\d+\.\d+\.\d+\.\d+$/)
103 0 9 if ($value =~ /:/)
107 0 9 unless ($value =~ /\./)
111 4 5 if ($field eq 'sender')
122 2 0 if (defined $info) { }