| line |
true |
false |
branch |
|
14
|
0 |
0 |
if (defined $options and ref $options eq 'HASH') |
|
15
|
0 |
0 |
if (defined $$options{'cache_expires_in'}) |
|
18
|
0 |
0 |
if (defined $$options{'cache_purge_interval'}) |
|
21
|
0 |
0 |
if (defined $$options{'cache_max_age'}) |
|
24
|
0 |
0 |
if (defined $$options{'cache_max_objects'}) |
|
42
|
0 |
0 |
if (@_) |
|
43
|
0 |
0 |
if (ref $_[0] eq '') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa(ref $_[0], 'CGI')) { } |
|
51
|
0 |
0 |
if (@_ and ref $_[0] eq 'HASH') |
|
53
|
0 |
0 |
if (defined $$options{'debug'}) |
|
57
|
0 |
0 |
unless (defined $useragent) |
|
59
|
0 |
0 |
unless (defined $useragent) |
|
60
|
0 |
0 |
if $debug |
|
68
|
0 |
0 |
if (defined $mua or $cache->key_exists($useragent)) |
|
69
|
0 |
0 |
if $debug |
|
107
|
0 |
0 |
if (defined $options and ref $options eq 'HASH') |
|
108
|
0 |
0 |
if (defined $$options{'expires_in'} and $$options{'expires_in'}) |
|
111
|
0 |
0 |
if (defined $$options{'purge_interval'} and $$options{'purge_interval'}) |
|
114
|
0 |
0 |
if (defined $$options{'max_age'} and $$options{'max_age'}) |
|
117
|
0 |
0 |
if (defined $$options{'max_objects'} and $$options{'max_objects'}) |
|
150
|
0 |
0 |
if (exists $$objects{$key}) |
|
163
|
0 |
0 |
if ($$self{'last_purge'} + $$self{'purge_interval'} <= time) |
|
180
|
0 |
0 |
if ($$object[2] + $expires <= $now or $$object[1] + $max_age <= $now) |
|
198
|
0 |
0 |
if (++$$self{'max_objects_set_counter'} >= $$self{'max_objects_check_interval'}) |
|
211
|
0 |
0 |
if ($size <= $max_objects) |