Condition Coverage

blib/lib/Net/DNS/Resolver/Base.pm
Criterion Covered Total %
condition 70 70 100.0


and 3 conditions

line !l l&&!r l&&r condition
158 46 24 4 $ref and $ref ne "ARRAY"
384 1 10 2 $self->{'defnames'} && !($name =~ /[.:]/)
466 5 1 2 $self->{'tsig_rr'} and not $reply->verify($query)
537 65 1 2 $self->{'tsig_rr'} and not $reply->verify($query)
682 8 1 1 $self->{'tsig_rr'} and not $reply->verify($query)
696 1 87 6 $query and $header->id != $query->header->id

or 2 conditions

line l !l condition
140 83 9 $initial ||= [%$base]
180 7 3 $res_option{lc $name} || (return)
195 1 7 $ENV{'RES_OPTIONS'} || ''
350 12 3 shift() || (return @null)
383 11 2 shift @argument || '.'
388 10 3 $self->send($fqdn, @argument) || (return)
398 5 1 shift @argument || '.'
407 2 5 $self->send($fqname, @argument) || (next)
425 65 17 $self->_send_udp($packet, $packet_data) || (return)
448 10 2 $connection || (next)
488 70 13 $self->{'retrans'} || 1
489 70 13 $self->{'retry'} || 1
505 92 39 $self->_create_udp_socket($ns) || (next)
606 9 2 $self->_create_udp_socket($ip) || (next)
626 10809 2 do { *$handle }->{'net_dns_bg'} ||= [time + $self->{'udp_timeout'}]
643 1 1 $self->_bgsend_tcp($query, $query->encode) || (return)
774 9 2 $socket || (next)
802 39 1 shift() || (return)
1065 55 47 +(shift())->{'udppacketsize'} || 0
1132 44 32 shift() || 0

or 3 conditions

line l !l&&r !l&&!r condition
296 175 114 7 _ipv4($ns) or _ipv6($ns)
321 92 4 136 scalar @ns or not defined wantarray
423 6 1 82 $self->{'usevc'} or length $packet_data > $self->_packetsz
567 6 1 9 $self->{'usevc'} or length $packet_data > $self->_packetsz