| line |
true |
false |
branch |
|
76
|
1 |
5 |
if not $updating and exists $data->{$rsrc_name}{$id} |
|
84
|
15 |
2 |
if ($updated) { } |
|
87
|
15 |
2 |
$updated ? : |
|
99
|
5 |
0 |
if (exists $data->{$rsrc_name} and exists $data->{$rsrc_name}{$id}) |
|
101
|
5 |
0 |
unless scalar keys %{$$data{$rsrc_name};} |
|
111
|
0 |
16 |
if $gd |
|
128
|
0 |
6 |
unless $paths[0] |
|
130
|
5 |
1 |
if scalar @paths == 1 |
|
135
|
0 |
1 |
unless &is_stale($loaded, $cache_mtime, $newest) |
|
142
|
1 |
1 |
if $path_mtime > $newest |
|
155
|
73 |
10 |
$attr ? : |
|
164
|
80 |
2 |
if defined $stat |
|
170
|
36 |
46 |
if (&is_stale($data, $cache_mtime, $path_mtime)) { } |
|
171
|
0 |
36 |
if ($for_update and not $path->exists) { } |
|
185
|
55 |
24 |
unless $for_update |
|
202
|
38 |
5 |
exists $data->{$rsrc_name} ? : |
|
213
|
1 |
56 |
if ($wantarray) { } |
|
220
|
1 |
51 |
$wantarray ? : |
|
228
|
1 |
10 |
unless my $updated = $self->create_or_update($path, $result, $updating, $cond) |
|
237
|
0 |
125 |
unless $path |
|
238
|
0 |
125 |
unless &blessed($path) |
|
239
|
0 |
125 |
unless $rsrc_name |
|
249
|
0 |
28 |
unless $create or $exists |
|
250
|
7 |
21 |
unless $exists |
|
251
|
28 |
0 |
if $self->atomic_write |
|
253
|
3 |
18 |
if ($exists and $self->backup and not $path->empty) |
|
254
|
0 |
3 |
unless copy("$path", $path . $self->backup) |