| line |
true |
false |
branch |
|
112
|
2 |
12 |
unless UNIVERSAL::isa($ipv4_address, "NetAddr::IP") and $ipv4_address->version == 4 |
|
132
|
2 |
3 |
unless UNIVERSAL::isa($ipv6_address, "NetAddr::IP") and $ipv6_address->version == 6 and $ipv6_address->short =~ $self->ipv4_mapped_ipv6_address_pattern |
|
136
|
3 |
0 |
$ipv6_address->masklen >= 96 ? : |
|
172
|
0 |
0 |
unless UNIVERSAL::isa($ip_address, "NetAddr::IP") and $ip_address->version == 4 || $ip_address->version == 6 |
|
175
|
0 |
0 |
$ip_address->version == 4 ? : |
|
190
|
0 |
3 |
unless UNIVERSAL::isa($ip_address, "NetAddr::IP") and $ip_address->version == 4 || $ip_address->version == 6 |
|
195
|
2 |
1 |
if ($ip_address->version == 6) |
|
201
|
2 |
1 |
if ($ip_address->version == 4) { } |
|
|
1 |
0 |
elsif ($ip_address->version == 6) { } |
|
242
|
0 |
0 |
$ip_address->version == 4 ? : |
|
246
|
0 |
0 |
unless my(@ptr_rrs) = $ptr_packet->answer |
|
250
|
0 |
0 |
if defined $server->max_name_lookups_per_ptr_mech |
|
258
|
0 |
0 |
if ($ptr_rr->type eq 'PTR') { } |
|
262
|
0 |
0 |
if ($ptr_domain =~ /^\Q$domain\E$/i) { } |
|
|
0 |
0 |
elsif ($ptr_domain =~ /\.\Q$domain\E$/i) { } |
|
274
|
0 |
0 |
if not $accept_any_domain and $match_type == 0 |
|
280
|
0 |
0 |
unless my(@addr_rrs) = $addr_packet->answer |
|
283
|
0 |
0 |
if ($addr_rr->type eq $addr_rr_type) { } |
|
|
0 |
0 |
elsif ($addr_rr->type =~ /^(CNAME|A|AAAA)$/) { } |
|
284
|
0 |
0 |
if $ip_address == "NetAddr::IP"->new($addr_rr->address) |
|
307
|
0 |
0 |
if ($is_valid_domain) |
|
310
|
0 |
0 |
unless $find_best_match |
|
313
|
0 |
0 |
if $match_type == 2 |
|
316
|
0 |
0 |
if (not defined $best_match_type or $match_type > $best_match_type) |
|
345
|
0 |
0 |
unless defined $string |