Branch Coverage

blib/lib/Cache/Meh.pm
Criterion Covered Total %
branch 22 32 68.7


line true false branch
17 2 4 if (defined $f)
29 2 1 if (defined $validity)
30 2 0 if ($validity > 0) { }
46 0 1 if (ref $coderef ne 'CODE') { }
65 0 2 unless exists $args{'filename'}
71 2 0 if (exists $args{'validity'}) { }
78 1 1 if exists $args{'lookup'}
88 1 1 if (-e $fname)
89 1 0 if (-r $fname) { }
111 0 2 unless nstore($$self{'~~~~cache'}, $filename)
117 0 2 unless close $fh
120 0 2 unless move($filename, $fname)
130 1 1 if (exists $$self{'~~~~cache'}{$key})
132 0 1 if time < $i
135 1 1 if (exists $$self{'lookup'} and ref $$self{'lookup'} eq 'CODE')
141 1 0 if (exists $$self{'~~~~cache'}{$key})