| line |
true |
false |
branch |
|
36
|
0 |
4 |
@_ > 1 ? : |
|
52
|
2 |
0 |
@_ > 1 ? : |
|
54
|
2 |
0 |
$self->table->rows ? : |
|
62
|
4 |
2 |
if ($params{$key} ne $row->{$key}) |
|
78
|
6 |
0 |
@_ > 1 ? : |
|
80
|
6 |
0 |
$self->table->rows ? : |
|
88
|
20 |
6 |
if ($params{$key} ne $row->{$key}) |
|
104
|
0 |
2 |
unless $find |
|
123
|
2 |
0 |
@_ > 1 ? : |
|
125
|
2 |
0 |
$self->table->rows ? : |
|
131
|
6 |
2 |
if ($params{$key} ne $row->{$key}) |
|
156
|
2 |
0 |
if ($keyfield) { } |
|
165
|
0 |
0 |
if ($r->$key ne $row->{$key}) |
|
188
|
0 |
4 |
unless open my $fh, "<:encoding(UTF-8)", $self->file |
|
195
|
0 |
12 |
unless open my $fh, ">:encoding(UTF-8)", $self->save_file |
|
201
|
0 |
0 |
unless scalar @args |