| line |
true |
false |
branch |
|
57
|
0 |
0 |
if (ref $class) { } |
|
66
|
0 |
0 |
if ($class->can('CACHE_INDEX')) { } |
|
|
0 |
0 |
elsif ($class->isa('Class::DBI')) { } |
|
68
|
0 |
0 |
if ref $index_fields[0] eq 'ARRAY' |
|
75
|
0 |
0 |
if (ref $data eq 'ARRAY') |
|
95
|
0 |
0 |
unless exists $$data{$_} |
|
117
|
0 |
0 |
if ref $class |
|
121
|
0 |
0 |
unless (UNIVERSAL::isa($key, 'Class::DBI::Cachable::IndexKey')) |
|
127
|
0 |
0 |
if (defined $$key{'key'}) |
|
128
|
0 |
0 |
unless defined $class->CACHE |
|
145
|
0 |
0 |
unless defined $self->CACHE |
|
165
|
0 |
0 |
unless defined $self->CACHE |
|
188
|
0 |
0 |
if exists $CACHE_OBJ{$class} |
|
193
|
0 |
0 |
$class->can('CACHE_ROOT') ? : |
|
|
0 |
0 |
$class->can('CACHE_DEPTH') ? : |
|
|
0 |
0 |
$class->can('EXPIRES') ? : |
|
|
0 |
0 |
$class->can('CACHE_PURGE_INTERVAL') ? : |
|
|
0 |
0 |
unless $CACHE_OBJ{$class} = 'Cache::FileCache'->new({'cache_root', $class->can('CACHE_ROOT') ? $class->CACHE_ROOT : '/tmp/' . $Class::DBI::ObjectCache::CLASS, 'cache_depth', $class->can('CACHE_DEPTH') ? $class->CACHE_DEPTH : 0, 'namespace', $class, 'default_expires_in', $class->can('EXPIRES') ? $class->EXPIRES : $Class::DBI::ObjectCache::EXPIRES_NEVER, 'auto_purge_interval', $class->can('CACHE_PURGE_INTERVAL') ? $class->CACHE_PURGE_INTERVAL : 600}) |
|
212
|
0 |
0 |
if ($@) |