| 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' |
|
120
|
0 |
0 |
exists $response->{'abuse-mailbox'} ? : |
|
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) { } |