| line |
true |
false |
branch |
|
64
|
0 |
0 |
unless $self->{'log'} = "Log::Tiny"->new($params->{'LOG'}{'file'}) |
|
152
|
0 |
0 |
if $sec =~ /^\d$/o |
|
153
|
0 |
0 |
if $min =~ /^\d$/o |
|
154
|
0 |
0 |
if $hour =~ /^\d$/o |
|
155
|
0 |
0 |
if $mday =~ /^\d$/o |
|
156
|
0 |
0 |
if $mon =~ /^\d$/o |
|
173
|
0 |
0 |
scalar @{$val->[1];} ? : |
|
191
|
0 |
0 |
if ($val) |
|
198
|
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}) { } |
|
|
0 |
0 |
elsif ($self->{'_ra'}) { } |
|
200
|
0 |
0 |
if ($self->{'CNAME'}{$qname}) |
|
225
|
0 |
0 |
if ($self->{'CNAME'}{$qname}) |
|
250
|
0 |
0 |
if ($self->{'CNAME'}{$qname}) |
|
272
|
0 |
0 |
if exists $self->{'A'}{$name} |
|
273
|
0 |
0 |
if exists $self->{'AAAA'}{$name} |
|
276
|
0 |
0 |
$ip =~ /:/o ? : |
|
351
|
0 |
0 |
unless $name =~ /$qname/ |
|
365
|
0 |
0 |
unless $name =~ /$qname/ |
|
393
|
0 |
0 |
if ($qtype eq 'A' or $qtype eq 'PTR' or $qtype eq 'MX' or $qtype eq 'SOA' or $qtype eq 'NS') { } |
|
397
|
0 |
0 |
if ($q) { } |
|
401
|
0 |
0 |
if ($qtype eq "MX") |
|
404
|
0 |
0 |
$ans->type eq 'CNAME' ? : |
|
406
|
0 |
0 |
unless $res |
|
408
|
0 |
0 |
if $seen{$ans->name} |
|
414
|
0 |
0 |
scalar @ans ? : |
|
427
|
0 |
0 |
if ($rcode ne "NOTIMP") |
|
429
|
0 |
0 |
if ($local) { } |
|
431
|
0 |
0 |
$qtype eq 'AXFR' || $qtype eq 'SOA' ? : |
|
433
|
0 |
0 |
if (exists $self->{'NS'}{$dom}) |
|
444
|
0 |
0 |
$self->{'CNAME'}{$ns} ? : |
|
446
|
0 |
0 |
$ip =~ /:/o ? : |
|
459
|
0 |
0 |
if (scalar @ans) |
|
460
|
0 |
0 |
unless (scalar @auth) |
|
461
|
0 |
0 |
$qtype eq 'MX' && $ans[0]->type ne 'CNAME' ? : |
|
|
0 |
0 |
$qtype eq 'PTR' ? : |
|
466
|
0 |
0 |
if ($qry) |
|
467
|
0 |
0 |
unless $_->type eq "NS" |
|
471
|
0 |
0 |
if $res |
|
484
|
0 |
0 |
$qtype eq 'AXFR' ? : |
|
488
|
0 |
0 |
if $local and scalar @auth |
|
489
|
0 |
0 |
if $self->{'_ra'} |