| line |
true |
false |
branch |
|
28
|
0 |
12 |
unless $columns->{'id'} ||= $self->generate_id($object_name, $props) |
|
32
|
0 |
12 |
unless my $filename = $self->_filename($object_name, $props, $columns->{'id'}) |
|
35
|
0 |
12 |
unless (sysopen FH, $filename, 577, 438) |
|
41
|
0 |
12 |
unless (flock FH, 2) |
|
50
|
0 |
12 |
unless (close FH) |
|
76
|
0 |
46 |
unless my $object_dir = $self->_dir($object_name, $props) |
|
82
|
0 |
46 |
unless (tie %files, 'IO::Dir', $object_dir) |
|
92
|
0 |
30 |
if (defined $args->{'limit'} and not $args->{'offset'} and not $args->{'sort'} and $n == $args->{'limit'}) |
|
96
|
92 |
141 |
if (S_ISDIR($stat->mode)) |
|
106
|
46 |
95 |
unless ($filename =~ /^$filef_pattern$/) |
|
110
|
0 |
95 |
unless (sysopen FH, 'File::Spec'->catfile($object_dir, $filename), 0) |
|
115
|
0 |
95 |
unless (flock FH, 1) |
|
122
|
0 |
95 |
unless (defined $datastr) |
|
126
|
71 |
24 |
if ($self->_matches_terms($data, $terms)) |
|
127
|
38 |
33 |
keys %$args ? : |
|
134
|
31 |
15 |
unless (keys %$args) |
|
164
|
0 |
51 |
unless my $filename = $self->_filename($object_name, $props, $id) |
|
167
|
1 |
50 |
unless (sysopen FH, $filename, 0) |
|
172
|
0 |
50 |
unless (flock FH, 1) |
|
181
|
0 |
50 |
unless ($data_str) |
|
195
|
0 |
7 |
unless (unlink $filename) |
|
215
|
0 |
5 |
unless (File::Path::rmtree($dir)) |
|
231
|
0 |
8 |
unless my $dir = $self->_dir($object_name, $props) |
|
235
|
0 |
8 |
unless (sysopen FH, $filename, 66) |
|
239
|
0 |
8 |
unless (flock FH, 2) |
|
244
|
0 |
8 |
unless (seek FH, 0, 0) |
|
248
|
0 |
8 |
unless (truncate FH, 0) |
|
253
|
0 |
8 |
unless (close FH) |
|
266
|
0 |
70 |
unless ($object_name and defined $id) |
|
269
|
0 |
70 |
unless my $dir = $self->_dir($object_name, $props) |
|
283
|
0 |
129 |
unless (defined $dir) |
|
294
|
6 |
123 |
unless (-e $object_dir) |
|
296
|
0 |
6 |
unless (File::Path::mkpath($object_dir)) |