blib/lib/Mojar/Cache.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 10 | 80.0 |
line | true | false | branch |
---|---|---|---|
31 | 2 | 21 | unless (eval { do { $value = $self->{'store'}{$self->namespace}{$key}; 1 } }) |
42 | 12 | 1 | unless ($self->is_valid($key)) |
52 | 1 | 13 | unless (eval { do { my $slots = $self->slots; unless ($self->is_valid($key)) { push @$slots, $key; while ($self->max_keys and scalar @$slots > $self->max_keys) { $self->remove(shift @$slots); }; }; $self->{'store'}{$self->namespace}{$key} = $value; 1 } }) |
62 | 1 | 1 | if exists $cache->{$key} |
130 | 0 | 0 | unless $_[0]{'store'}{$_[0]->namespace} |