line |
true |
false |
branch |
35
|
0 |
0 |
$ver == 4 ? : |
48
|
0 |
0 |
if @RESOLVERS |
51
|
0 |
0 |
if ($query) |
53
|
0 |
0 |
if ($rr->type eq $rr_type) |
54
|
0 |
0 |
if ($rr_type eq 'TXT') { } |
|
0 |
0 |
elsif ($rr_type eq 'SOA') { } |
|
0 |
0 |
elsif ($rr_type eq 'PTR') { } |
63
|
0 |
0 |
unless $concat |
67
|
0 |
0 |
if ($concat and $concat == 2) { } |
92
|
0 |
0 |
unless $string |
105
|
0 |
0 |
unless $ver |
113
|
0 |
0 |
if $#bits > 0 |
118
|
0 |
0 |
unless ref $response eq 'HASH' |
132
|
0 |
0 |
unless $ver |
134
|
0 |
0 |
$ver == 4 ? : |
138
|
0 |
0 |
unless my $data = [_return_rr($lookup, 'TXT', 2)] |
155
|
0 |
0 |
unless $data and @$data |
158
|
0 |
0 |
if ($data->[0][0] =~ /^(\d+) \d+/) |
171
|
0 |
0 |
unless $ver and $ver == 4 |
174
|
0 |
0 |
unless my(@origin_as) = _return_rr($lookup, 'TXT', 2) |
197
|
0 |
0 |
if wantarray |
206
|
0 |
0 |
unless $hash and lc($hash) =~ /^[a-z0-9]{32}$/ |
210
|
0 |
0 |
unless my $res = _return_rr($lookup, 'TXT') |
222
|
0 |
0 |
if (my $data = _return_rr("AS$asn.asn.cymru.com", 'TXT')) { } |
229
|
0 |
0 |
unless $ASdata[4] |
234
|
0 |
0 |
if $ASdata[2] eq ' arin ' |
243
|
0 |
0 |
unless defined $desc |
263
|
0 |
0 |
if (my $soa_contact = _return_rr($lookup, 'SOA')) |
264
|
0 |
0 |
unless $soa_contact =~ /@/ |
274
|
0 |
0 |
unless $ver |
276
|
0 |
0 |
$ver == 4 ? : |
285
|
0 |
0 |
unless $ver and $ver == 4 |
299
|
0 |
0 |
unless $asn =~ /^\d+$/ |
302
|
0 |
0 |
if ($as_cc) |
321
|
0 |
0 |
unless scalar @tlds |
324
|
0 |
0 |
if (scalar @parts == 2) |
328
|
0 |
0 |
if (grep /^\Q$parts[1].$parts[0]\E$/, @tlds) { } |