| lib/File/DataClass/Cache.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 16 | 93.7 |
| line | true | false | branch |
|---|---|---|---|
| 63 | 74 | 1 | $key ? : |
| 65 | 46 | 29 | if $cached |
| 78 | 1 | 9 | unless $k |
| 80 | 1 | 8 | unless my $mtimes = $self->cache->get($self->_mtimes_key) |
| 86 | 1 | 23 | unless defined $key |
| 97 | 1 | 27 | if $key eq $self->_mtimes_key |
| 98 | 0 | 27 | unless $self->cache->set($key, {'data', $data, 'meta', $meta}) |
| 123 | 25 | 25 | if (defined $v) { } |