Branch Coverage

blib/lib/Net/Connection/Match/PTR.pm
Criterion Covered Total %
branch 18 26 69.2


line true false branch
103 3 1 if (defined $_[1])
108 1 1 unless (defined $args{'ptrs'} or defined $args{'fptrs'} or defined $args{'lptrs'})
115 0 0 if (defined $args{'ptrs'} and not defined $args{'ptrs'}[0] and (defined $args{'lptrs'} and not defined $args{'lptrs'}[0]) and (defined $args{'fptrs'} and not defined $args{'fptrs'}[0]))
146 1 2 if (defined $args{'ptrs'})
156 1 2 if (defined $args{'lptrs'})
166 1 2 if (defined $args{'fptrs'})
198 1 7 unless (defined $object)
202 1 6 if (ref $object ne 'Net::Connection')
209 6 0 if (defined $l_ptr) { }
217 0 0 if (defined $answer->{'answer'}[0] and ref $answer->{'answer'}[0] eq 'Net::DNS::RR::PTR')
224 6 0 if (defined $f_ptr) { }
232 0 0 if (defined $answer->{'answer'}[0] and ref $answer->{'answer'}[0] eq 'Net::DNS::RR::PTR')
240 2 2 if (defined $self->{'ptrs'}{$l_ptr} or defined $self->{'ptrs'}{$f_ptr} or defined $self->{'lptrs'}{$l_ptr} or defined $self->{'fptrs'}{$f_ptr})