Branch Coverage

blib/lib/Net/DNS/Nameserver/Trivial.pm
Criterion Covered Total %
branch 0 94 0.0


line true false branch
69 0 0 unless $self->{'log'} = "Log::Tiny"->new($params->{'LOG'}{'file'})
157 0 0 if $sec =~ /^\d$/o
158 0 0 if $min =~ /^\d$/o
159 0 0 if $hour =~ /^\d$/o
160 0 0 if $mday =~ /^\d$/o
161 0 0 if $mon =~ /^\d$/o
178 0 0 scalar @{$val->[1];} ? :
196 0 0 if ($val)
203 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'}) { }
205 0 0 if ($self->{'CNAME'}{$qname})
230 0 0 if ($self->{'CNAME'}{$qname})
255 0 0 if ($self->{'CNAME'}{$qname})
277 0 0 if exists $self->{'A'}{$name}
278 0 0 if exists $self->{'AAAA'}{$name}
281 0 0 $ip =~ /:/o ? :
356 0 0 unless $name =~ /$qname/
370 0 0 unless $name =~ /$qname/
398 0 0 if ($qtype eq 'A' or $qtype eq 'PTR' or $qtype eq 'MX' or $qtype eq 'SOA' or $qtype eq 'NS') { }
402 0 0 if ($q) { }
406 0 0 if ($qtype eq "MX")
409 0 0 $ans->type eq 'CNAME' ? :
411 0 0 unless $res
413 0 0 if $seen{$ans->name}
419 0 0 scalar @ans ? :
432 0 0 if ($rcode ne "NOTIMP")
434 0 0 if ($local) { }
436 0 0 $qtype eq 'AXFR' || $qtype eq 'SOA' ? :
438 0 0 if (exists $self->{'NS'}{$dom})
449 0 0 $self->{'CNAME'}{$ns} ? :
451 0 0 $ip =~ /:/o ? :
464 0 0 if (scalar @ans)
465 0 0 unless (scalar @auth)
466 0 0 $qtype eq 'MX' && $ans[0]->type ne 'CNAME' ? :
0 0 $qtype eq 'PTR' ? :
471 0 0 if ($qry)
472 0 0 unless $_->type eq "NS"
476 0 0 if $res
489 0 0 $qtype eq 'AXFR' ? :
493 0 0 if $local and scalar @auth
494 0 0 if $self->{'_ra'}