Branch Coverage

blib/lib/IP/Country/Slow.pm
Criterion Covered Total %
branch 1 28 3.5


line true false branch
22 1 0 unless (defined $singleton)
36 0 0 defined $_[1] ? :
37 0 0 if ($bool) { }
48 0 0 if ($hostname =~ /$ip_match/) { }
53 0 0 if ($cache and exists $cache{$hostname}) { }
56 0 0 if (my $cc = &_get_cc_from_tld($hostname)) { }
60 0 0 if $cache
70 0 0 if ($cache and exists $cache{$ip_addr}) { }
74 0 0 if $ip_dotted =~ /$private_ip/
75 0 0 if (my $hostname = gethostbyaddr($ip_addr, 2))
76 0 0 if (my $cc = &_get_cc_from_tld($hostname))
77 0 0 if $cache
82 0 0 if $cache
90 0 0 if ($hostname =~ /$tld_match/) { }