Branch Coverage

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


line true false branch
33 0 0 if ($error eq 'NXDOMAIN') { }
0 0 elsif ($error eq 'NOERROR') { }
58 8 60 if $self->is_local_ip_address
59 2 58 if $self->is_trusted_ip_address
60 0 58 if $self->is_authenticated
75 22 36 if ($packet)
77 2 20 if ($rr->type eq 'CNAME')
81 20 2 if ($rr->type eq 'PTR')
87 0 58 if ($resolver->errorstring)
89 0 0 if $resolver->errorstring ne 'unknown error or no error'
95 2 0 if ($packet)
101 2 0 if ($rr->type eq 'PTR')
106 0 2 if ($resolver->errorstring)
108 0 0 if $resolver->errorstring ne 'unknown error or no error'
113 36 22 unless (keys %$ptr_list)
123 0 22 if ($ip_address =~ /:/) { }
129 0 0 if ($cname)
132 0 0 unless (@$ip_list)
136 0 0 unless (@$ip_list)
139 0 0 if ($cname)
142 0 0 unless (@$ip_list)
147 0 0 unless (@$ip_list)
162 2 20 if ($cname)
165 0 2 unless (@$ip_list)
169 0 22 unless (@$ip_list)
172 0 0 if ($cname)
175 0 0 unless (@$ip_list)
180 0 22 unless (@$ip_list)
182 0 0 if $resolver->errorstring ne 'unknown error or no error'
185 0 0 if $resolver->errorstring ne 'unknown error or no error'
200 22 0 if ($is_overlap == $Mail::Milter::Authentication::Handler::IPRev::IP_IDENTICAL)
207 36 22 if (not @match_list) { }
242 0 24 if ($lookup_limit <= 0)
247 24 0 if ($packet)
249 2 22 if (lc $rr->type eq 'cname')
254 22 2 if (lc $rr->type eq lc $type)
260 0 24 if ($resolver->errorstring)