Branch Coverage

blib/lib/Net/Frame/Layer/DNS.pm
Criterion Covered Total %
branch 12 32 37.5


line true false branch
122 0 0 if ($sQr == 0 and $wQr == 1 and $sId == $wId)
145 0 1 unless my $raw = $self->SUPER::pack('nnnnnn', $self->id, $bvlist->to_Dec, $self->qdCount, $self->anCount, $self->nsCount, $self->arCount)
162 0 1 unless my($id, $bv, $qdCount, $anCount, $nsCount, $arCount, $payload) = $self->SUPER::unpack('nnnnnn a*', $self->raw)
187 0 1 if $self->nextLayer
189 0 1 if ($self->payload)
239 2 9 if ($start == 0)
242 1 1 if ($start == 0)
247 0 1 if (($start & 192) == 192)
250 0 0 if ($name ne '')
254 0 0 if (defined($ptr = _getptr($ptr))) { }
264 0 1 if ($name ne '')
271 0 9 if ($t == 0)
276 0 9 if (($t & 192) == 192)
279 0 0 if ($name ne '')
283 0 0 if (defined($ptr = _getptr($ptr))) { }
303 0 0 if (defined $dns_payload)