Branch Coverage

blib/lib/IO/Lambda/DNS.pm
Criterion Covered Total %
branch 11 28 39.2


line true false branch
26 6 0 if ($i == 0 or $i == $#_ or not defined $_[$i]) { }
0 0 elsif ($_[$i] =~ /^(timeout|deadline)$/) { }
0 0 elsif ($_[$i] eq 'retry') { }
0 0 elsif ($_[$i] =~ /^( nameservers|recurse|debug|config_file| domain|port|srcaddr|srcport|retrans| usevc|stayopen|igntc|defnames|dnsrch| persistent_tcp|persistent_udp|dnssec )$/x) { }
52 0 5 unless $bg_obj
55 5 0 if ($Net::DNS::VERSION > 1.02) { }
58 0 5 if (1 != @handles)
69 0 5 unless (shift())
70 0 0 if $retries-- <= 0
75 0 5 if ($err)
79 0 5 unless $obj->bgisready($bg_obj)
85 0 5 unless $packet
87 4 1 if ($simple_query)
90 4 0 if $_->type eq 'A'