Branch Coverage

blib/lib/Mail/Milter/Authentication/Handler/IPRev.pm
Criterion Covered Total %
branch 33 74 44.5


line true false branch
31 0 0 if ($error eq 'NXDOMAIN') { }
0 0 elsif ($error eq 'NOERROR') { }
55 8 60 if $self->is_local_ip_address
56 2 58 if $self->is_trusted_ip_address
71 22 36 if ($packet)
73 2 20 if ($rr->type eq "CNAME")
77 20 2 if ($rr->type eq "PTR")
83 0 58 if ($resolver->errorstring)
85 0 0 if $resolver->errorstring ne "unknown error or no error"
91 2 0 if ($packet)
97 2 0 if ($rr->type eq "PTR")
102 0 2 if ($resolver->errorstring)
104 0 0 if $resolver->errorstring ne "unknown error or no error"
109 36 22 unless (keys %$ptr_list)
119 0 22 if ($ip_address =~ /:/u) { }
125 0 0 if ($cname)
128 0 0 unless (@$ip_list)
132 0 0 unless (@$ip_list)
135 0 0 if ($cname)
138 0 0 unless (@$ip_list)
143 0 0 unless (@$ip_list)
158 2 20 if ($cname)
161 0 2 unless (@$ip_list)
165 0 22 unless (@$ip_list)
168 0 0 if ($cname)
171 0 0 unless (@$ip_list)
176 0 22 unless (@$ip_list)
178 0 0 if $resolver->errorstring ne "unknown error or no error"
181 0 0 if $resolver->errorstring ne "unknown error or no error"
195 0 22 if (not $i2) { }
200 22 0 if ($is_overlap == $Mail::Milter::Authentication::Handler::IPRev::IP_IDENTICAL)
208 36 22 if (not @match_list) { }
241 0 24 if ($lookup_limit <= 0)
246 24 0 if ($packet)
248 2 22 if (lc $rr->type eq "cname")
253 22 2 if (lc $rr->type eq lc $type)
259 0 24 if ($resolver->errorstring)