| line |
true |
false |
branch |
|
108
|
2 |
12 |
unless UNIVERSAL::isa($ipv4_address, 'NetAddr::IP') and $ipv4_address->version == 4 |
|
128
|
3 |
3 |
unless UNIVERSAL::isa($ipv6_address, 'NetAddr::IP') and $ipv6_address->version == 6 and $ipv6_address->short =~ $self->ipv4_mapped_ipv6_address_pattern |
|
132
|
3 |
0 |
$ipv6_address->masklen >= 96 ? : |
|
168
|
0 |
0 |
unless UNIVERSAL::isa($ip_address, 'NetAddr::IP') and $ip_address->version == 4 || $ip_address->version == 6 |
|
171
|
0 |
0 |
$ip_address->version == 4 ? : |
|
186
|
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 == 4) { } |
|
|
1 |
0 |
elsif ($ip_address->version == 6) { } |
|
236
|
0 |
0 |
$ip_address->version == 4 ? : |
|
240
|
0 |
0 |
unless my(@ptr_rrs) = $ptr_packet->answer |
|
244
|
0 |
0 |
if defined $server->max_name_lookups_per_ptr_mech |
|
252
|
0 |
0 |
if ($ptr_rr->type eq 'PTR') { } |
|
256
|
0 |
0 |
if ($ptr_domain =~ /^\Q$domain\E$/i) { } |
|
|
0 |
0 |
elsif ($ptr_domain =~ /\.\Q$domain\E$/i) { } |
|
268
|
0 |
0 |
if not $accept_any_domain and $match_type == 0 |
|
274
|
0 |
0 |
unless my(@addr_rrs) = $addr_packet->answer |
|
277
|
0 |
0 |
if ($addr_rr->type eq $addr_rr_type) { } |
|
|
0 |
0 |
elsif ($addr_rr->type =~ /^(CNAME|A|AAAA)$/) { } |
|
278
|
0 |
0 |
if $ip_address == 'NetAddr::IP'->new($addr_rr->address) |
|
301
|
0 |
0 |
if ($is_valid_domain) |
|
304
|
0 |
0 |
unless $find_best_match |
|
307
|
0 |
0 |
if $match_type == 2 |
|
310
|
0 |
0 |
if (not defined $best_match_type or $match_type > $best_match_type) |
|
339
|
0 |
0 |
unless defined $string |