| line |
true |
false |
branch |
|
62
|
251 |
63 |
unless (exists $Net::DNS::Question::classbyname{$qclass}) |
|
63
|
7 |
244 |
if exists $Net::DNS::Question::classbyname{$qtype} |
|
64
|
3 |
248 |
if $qtype =~ /CLASS/ |
|
66
|
140 |
174 |
unless (exists $Net::DNS::Question::typebyname{$qtype}) |
|
67
|
5 |
135 |
if exists $Net::DNS::Question::typebyname{$qclass} |
|
68
|
2 |
138 |
if $qclass =~ /TYPE/ |
|
72
|
84 |
230 |
if (defined $qname and $qname =~ /:|\d$/) |
|
73
|
82 |
2 |
if (my $reverse = _dns_addr($qname)) |
|
116
|
5 |
155 |
if length $$data < $next |
|
119
|
137 |
18 |
wantarray ? : |
|
267
|
1 |
84 |
unless m[^[a-fA-F0-9:./]+$] |
|
272
|
22 |
62 |
if (m[^\d*[.\d]*\d(/\d+)?$]) |
|
274
|
13 |
9 |
unless $pfxlen |
|
275
|
7 |
15 |
$pfxlen > 24 ? : |
|
280
|
1 |
61 |
unless m[^[:\w]+:([.\w]*)(/\d+)?$] |
|
282
|
1 |
60 |
if /^[:0]*:0*:[fF]{4}:[^:]+$/ |
|
283
|
1 |
3 |
unless $_ |
|
|
1 |
59 |
if /\./ |
|
286
|
340 |
28 |
/./ ? : |
|
287
|
45 |
15 |
unless $pfxlen |
|
288
|
40 |
20 |
$pfxlen > 124 ? : |