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' |