| line |
true |
false |
branch |
|
55
|
0 |
3 |
unless $$self{'CACHESIZE'} |
|
58
|
1 |
2 |
unless $$self{'TUNECACHESIZE'} |
|
61
|
0 |
3 |
unless defined $$self{'INSTANCE'} |
|
63
|
0 |
3 |
if ($$_{'INSTANCE'} eq $$self{'INSTANCE'}) |
|
67
|
2 |
1 |
if ($$self{'TUNECACHESIZE'}) |
|
78
|
0 |
3 |
if ($$self{'TIE'}) |
|
84
|
0 |
0 |
if ($@) |
|
88
|
0 |
0 |
unless ($rc) |
|
106
|
0 |
46 |
if $Memoize::ExpireLRU::DEBUG |
|
108
|
24 |
22 |
if (exists $$self{'C'}{$key}) { } |
|
114
|
0 |
24 |
unless (defined $i) |
|
132
|
21 |
3 |
if (defined $$self{'T'}) |
|
133
|
21 |
0 |
if defined $$self{'T'} |
|
137
|
0 |
24 |
if ($Memoize::ExpireLRU::DEBUG) |
|
139
|
0 |
0 |
if defined $$self{'T'} |
|
145
|
16 |
6 |
if (exists $$self{'TUNECACHESIZE'}) { } |
|
147
|
0 |
16 |
if $Memoize::ExpireLRU::DEBUG |
|
151
|
16 |
5 |
unless defined $$self{'TI'} and defined $$self{'TI'}[$i - $j] and defined $$self{'TI'}[$i - $j]{'k'} and $$self{'TI'}[$i - $j]{'k'} eq $key |
|
157
|
0 |
5 |
if $Memoize::ExpireLRU::DEBUG |
|
162
|
0 |
6 |
if $Memoize::ExpireLRU::DEBUG |
|
170
|
0 |
22 |
if $Memoize::ExpireLRU::DEBUG |
|
180
|
0 |
22 |
if defined $$self{'TC'} |
|
187
|
0 |
22 |
if defined $$self{'TC'} |
|
195
|
0 |
13 |
if defined $$self{'TC'} |
|
197
|
11 |
2 |
if defined $$self{'T'} |
|
201
|
16 |
6 |
if (defined $$self{'T'}) |
|
202
|
1 |
15 |
if (scalar @{$$self{'TI'};} > $$self{'TUNECACHESIZE'} - $$self{'CACHESIZE'}) |
|
213
|
0 |
24 |
if $Memoize::ExpireLRU::DEBUG |
|
227
|
0 |
0 |
if ($time < $$Aref[$n]{'t'}) { } |
|
232
|
0 |
0 |
if ($t <= $b) { } |
|
234
|
0 |
0 |
if ($$Aref[$t]{'t'} == $time) { } |
|
|
0 |
0 |
elsif ($$Aref[$b]{'t'} == $time) { } |
|
246
|
0 |
0 |
if $l == $n |
|
257
|
0 |
24 |
if ($key ne $$Aref[$n]{'k'}) |
|
266
|
1 |
0 |
if $Memoize::ExpireLRU::EndDebug |
|
276
|
1 |
1 |
unless $$self{'INSTANCE'} eq $Instance |
|
299
|
2 |
4 |
unless defined $$self{'T'} |
|
300
|
2 |
2 |
unless $k |
|
314
|
4 |
18 |
if ($i == $$self{'CACHESIZE'}) |