line |
true |
false |
branch |
34
|
0 |
1717 |
@_ > 1 ? : |
46
|
1715 |
2 |
if ($self->table->rows) { } |
49
|
0 |
2 |
ref($data || '') eq 'ARRAY' ? : |
62
|
2 |
0 |
@_ > 1 ? : |
68
|
1 |
1 |
if (ref $data eq "ARRAY" and ref $data->[0] eq "HASH") |
78
|
2 |
0 |
@_ > 1 ? : |
84
|
0 |
2 |
if (ref $data eq "HASH") |
96
|
0 |
0 |
unless $find |
117
|
0 |
1 |
@_ > 1 ? : |
119
|
1 |
0 |
$self->table->rows ? : |
125
|
1 |
1 |
if ($params{$key} ne $row->{$key}) |
152
|
0 |
0 |
if ($keyfield) { } |
161
|
0 |
0 |
if ($r->$key ne $row->{$key}) |
212
|
3 |
3 |
if (scalar keys %file_params) |
215
|
2 |
3 |
if $key =~ /^__/ |
216
|
2 |
1 |
if (not $row or $row->$key ne $file_params{$key}) |
222
|
4 |
2 |
if $clear |
230
|
3 |
3 |
unless $name =~ s/^find__// |
260
|
5 |
105 |
scalar @cache_file ? : |
274
|
4 |
102 |
if ($cache_file) |
292
|
1727 |
65 |
if my $pid = $fm->start |
299
|
1 |
64 |
unless ($file =~ /^\d{9}\d+/) |
309
|
36 |
1 |
if ($args{'sort_direction'} eq 'asc') { } |
326
|
1 |
1 |
if ($cache_file) |
332
|
1 |
0 |
$self->table->rows ? : |
338
|
2 |
1 |
if ($params{$key} ne $row->{$key}) |
358
|
0 |
2 |
if ($cache_file) |
364
|
2 |
0 |
$self->table->rows ? : |
372
|
1 |
2 |
if ($params{$key} ne $row->{$key}) |
380
|
2 |
0 |
if $select |
388
|
0 |
70 |
unless open my $fh, "<:encoding(UTF-8)", $file |
395
|
0 |
1760 |
unless open my $fh, ">:encoding(UTF-8)", $file |
401
|
0 |
0 |
unless scalar @args |
415
|
0 |
1938 |
unless opendir my $dh, $directory |