Branch Coverage

lib/App/Cache.pm
Criterion Covered Total %
branch 31 40 77.5


line true false branch
20 8 0 unless ($self->application)
25 6 2 unless ($self->directory)
31 2 6 unless (-d "$dir")
32 0 2 unless mkpath("$dir")
36 7 1 unless (defined $self->enabled)
48 0 12 unless unlink $filename
53 2 1 if $dirname eq $self->directory
54 0 1 unless rmdir $dirname
61 1 3 unless -f $filename
62 0 3 unless unlink $filename
67 1 11 unless $self->enabled
70 4 7 unless -f $filename
75 4 3 if ($age < $ttl) { }
88 2 1 unless ($data)
98 2 1 unless ($data)
102 2 0 if ($response->is_success) { }
115 1 0 unless (-d $directory)
116 0 1 unless mkdir $directory
123 1 6 unless $self->enabled
125 0 6 unless nstore({'value', $value}, "$filename")