Condition Coverage

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


and 3 conditions

line !l l&&!r l&&r condition
158 47 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)
541 67 1 2 $self->{'tsig_rr'} and not $reply->verify($query)
690 7 1 1 $self->{'tsig_rr'} and not $reply->verify($query)
704 1 88 6 $query and $header->id != $query->header->id

or 2 conditions

line l !l condition
140 85 9 $initial ||= [%$base]
180 7 3 $res_option{lc $name} || (return)
195 1 7 $ENV{'RES_OPTIONS'} || ''
350 14 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 67 17 $self->_send_udp($packet, $packet_data) || (return)
448 10 2 $connection || (next)
488 72 13 $self->{'retrans'} || 1
489 72 13 $self->{'retry'} || 1
505 90 39 $self->_create_udp_socket($ns) || (next)
610 9 2 $self->_create_udp_socket($ip) || (next)
634 11497 2 do { *$handle }->{'net_dns_bg'} ||= [time + $self->{'udp_timeout'}]
651 0 0 $self->_bgsend_tcp($query, $query->encode) || (return)
782 9 2 $socket || (next)
810 39 1 shift() || (return)
1067 59 49 +(shift())->{'udppacketsize'} || 0
1134 44 33 shift() || 0

or 3 conditions

line l !l&&r !l&&!r condition
296 175 114 8 _ipv4($ns) or _ipv6($ns)
321 93 4 137 scalar @ns or not defined wantarray
423 6 1 84 $self->{'usevc'} or length $packet_data > $self->_packetsz
571 6 1 9 $self->{'usevc'} or length $packet_data > $self->_packetsz