Branch Coverage

blib/lib/Net/DNSServer/Cache.pm
Criterion Covered Total %
branch 0 32 0.0


line true false branch
25 0 0 unless my $value = shift()
26 0 0 unless ref $value eq 'ARRAY'
29 0 0 if ref $entry ne 'ARRAY' or $$entry[0] < time
54 0 0 unless ($cache_structure and ref $cache_structure eq 'ARRAY' and scalar @$cache_structure == 3)
73 0 0 unless ($answer_ref and $authority_ref and $additional_ref)
98 0 0 if (ref $array_ref ne 'ARRAY')
103 0 0 unless ($lookup and ref $lookup eq 'ARRAY')
110 0 0 unless ref $entry eq 'ARRAY'
123 0 0 if ($$self{'net_server'}{'usecache'})
155 0 0 if (not $Net::DNSServer::Cache::expiration_check or $expiration < $Net::DNSServer::Cache::expiration_check)
172 0 0 unless $now > $Net::DNSServer::Cache::expiration_check
176 0 0 unless ref $cache eq 'ARRAY'
177 0 0 if ($lookup =~ /^(.+)\;lookup$/)
180 0 0 if (ref $entry eq 'ARRAY')
182 0 0 if ($expires < $now)
188 0 0 if ($expires > $Net::DNSServer::Cache::expiration_check and !$next_expiration_check || $expires < $next_expiration_check)