Branch Coverage

blib/lib/Data/Tubes/Util/Cache.pm
Criterion Covered Total %
branch 13 22 59.0


line true false branch
26 15 3 if (ref $repo eq "HASH")
27 11 4 unless exists $repo->{$key}
31 1 2 if -r $path
37 0 0 if (my $retval = $self->__filenames)
42 0 0 unless opendir my $dh, $repo
51 0 6 unless my $max = $self->max_items
54 6 0 if (ref $repo eq "HASH")
60 0 0 unless my $filenames = $self->_filenames
71 11 2 if ref $repo eq "HASH"
72 0 2 unless eval {
73 1 1 unless -d $repo