| line |
true |
false |
branch |
|
236
|
0 |
55 |
unless $_cachedir |
|
239
|
0 |
55 |
if $_cachedir and not -d $_cachedir |
|
242
|
0 |
55 |
unless ($_cachedir and -d $_cachedir) |
|
247
|
0 |
55 |
if ($_refresh eq 'always') { } |
|
|
54 |
1 |
elsif ($_refresh eq 'never') { } |
|
|
1 |
0 |
elsif ($_refresh eq 'yearly') { } |
|
257
|
0 |
0 |
unless $_refresh =~ / \A \d+ \Z /msux |
|
277
|
55 |
1 |
if (defined $file and -f $file) { } |
|
304
|
0 |
1 |
unless -d $_cachedir |
|
308
|
0 |
1 |
unless defined $store_file |
|
327
|
0 |
1 |
unless my $file = $self->_path_to_key($uri) |
|
353
|
0 |
0 |
if ($st) |
|
354
|
0 |
0 |
unless my($ctype, $doclen, $mtime, $exp, $svr) = &head($uri) |
|
357
|
0 |
0 |
if ($mtime > $st->mtime) { } |
|
360
|
0 |
0 |
if $content |
|
371
|
0 |
0 |
if $content |
|
386
|
1 |
0 |
if ($st and $st->mtime >= $cutoff_mtime) |
|
393
|
0 |
0 |
unless my($ctype, $doclen, $mtime, $exp, $svr) = &head($uri) |
|
398
|
0 |
0 |
if ($st and $st->mtime >= $mtime) |
|
407
|
0 |
0 |
if $content |
|
431
|
0 |
62 |
unless defined $uri |