line |
true |
false |
branch |
69
|
0 |
0 |
unless $$self{'log'} = 'Log::Tiny'->new($$params{'LOG'}{'file'}) |
156
|
0 |
0 |
if $sec =~ /^\d$/o |
157
|
0 |
0 |
if $min =~ /^\d$/o |
158
|
0 |
0 |
if $hour =~ /^\d$/o |
159
|
0 |
0 |
if $mday =~ /^\d$/o |
160
|
0 |
0 |
if $mon =~ /^\d$/o |
177
|
0 |
0 |
scalar @{$$val[1];} ? : |
195
|
0 |
0 |
if ($val) |
202
|
0 |
0 |
if ($qtype eq 'A' and exists $$self{'A'}{$qname} || exists $$self{'CNAME'}{$qname}) { } |
|
0 |
0 |
elsif ($qtype eq 'AAAA' || $qtype eq 'A6' and exists $$self{'AAAA'}{$qname} || exists $$self{'CNAME'}{$qname}) { } |
|
0 |
0 |
elsif ($qtype eq 'MX' and exists $$self{'MX'}{$qname} || exists $$self{'CNAME'}{$qname}) { } |
|
0 |
0 |
elsif ($qtype eq 'PTR' and exists $$self{'PTR'}{$qname}) { } |
|
0 |
0 |
elsif ($qtype eq 'SOA' and exists $$self{'SOA'}{$qname}) { } |
|
0 |
0 |
elsif ($qtype eq 'NS' and exists $$self{'NS'}{$qname}) { } |
|
0 |
0 |
elsif ($qtype eq 'AXFR' and exists $$self{'SOA'}{$qname} and exists $$self{'SL'}{$peerhost}) { } |
204
|
0 |
0 |
if ($$self{'CNAME'}{$qname}) |
229
|
0 |
0 |
if ($$self{'CNAME'}{$qname}) |
254
|
0 |
0 |
if ($$self{'CNAME'}{$qname}) |
276
|
0 |
0 |
if exists $$self{'A'}{$name} |
277
|
0 |
0 |
if exists $$self{'AAAA'}{$name} |
280
|
0 |
0 |
$ip =~ /:/o ? : |
355
|
0 |
0 |
unless $name =~ /$qname/ |
369
|
0 |
0 |
unless $name =~ /$qname/ |
397
|
0 |
0 |
if ($qtype eq 'A' or $qtype eq 'PTR' or $qtype eq 'MX' or $qtype eq 'SOA' or $qtype eq 'NS') { } |
401
|
0 |
0 |
if ($q) { } |
405
|
0 |
0 |
if ($qtype eq 'MX') |
408
|
0 |
0 |
$ans->type eq 'CNAME' ? : |
410
|
0 |
0 |
unless $res |
412
|
0 |
0 |
if $seen{$ans->name} |
418
|
0 |
0 |
scalar @ans ? : |
430
|
0 |
0 |
if ($rcode ne 'NOTIMP') |
431
|
0 |
0 |
if ($local) { } |
433
|
0 |
0 |
$qtype eq 'AXFR' || $qtype eq 'SOA' ? : |
435
|
0 |
0 |
if (exists $$self{'NS'}{$dom}) |
446
|
0 |
0 |
$$self{'CNAME'}{$ns} ? : |
448
|
0 |
0 |
$ip =~ /:/o ? : |
461
|
0 |
0 |
if (scalar @ans) |
462
|
0 |
0 |
unless (scalar @auth) |
463
|
0 |
0 |
$qtype eq 'MX' && $ans[0]->type ne 'CNAME' ? : |
|
0 |
0 |
$qtype eq 'PTR' ? : |
468
|
0 |
0 |
if ($qry) |
469
|
0 |
0 |
unless $_->type eq 'NS' |
473
|
0 |
0 |
if $res |
486
|
0 |
0 |
$qtype eq 'AXFR' ? : |
490
|
0 |
0 |
if $local and scalar @auth |
491
|
0 |
0 |
if $$self{'_ra'} |