| line |
true |
false |
branch |
|
21
|
0 |
6 |
ref $_[0] eq 'HASH' ? : |
|
32
|
0 |
5 |
ref $_[0] eq 'HASH' ? : |
|
36
|
0 |
5 |
if ($args{'databases'}) |
|
39
|
0 |
5 |
unless $directory |
|
47
|
0 |
0 |
if (ref $_[0] eq 'HASH') { } |
|
|
0 |
0 |
elsif (scalar(@_) % 2 == 0) { } |
|
62
|
0 |
37 |
ref $_[0] eq 'HASH' ? : |
|
68
|
5 |
32 |
if ($self->{'logger'}) |
|
71
|
31 |
6 |
if $self->{$table} |
|
79
|
0 |
6 |
if (-r $slurp_file) { } |
|
83
|
0 |
0 |
if ($self->{'logger'}) |
|
89
|
2 |
4 |
if (defined $slurp_file and -r $slurp_file) { } |
|
97
|
6 |
0 |
if (defined $slurp_file and -r $slurp_file) { } |
|
100
|
4 |
2 |
if ($args{'column_names'}) { } |
|
115
|
3 |
3 |
if ($self->{'logger'}) |
|
165
|
0 |
0 |
if (-r $slurp_file) { } |
|
172
|
0 |
0 |
if ($self->{'logger'}) |
|
193
|
0 |
19 |
ref $_[0] eq 'HASH' ? : |
|
198
|
1 |
18 |
unless $self->{$table} |
|
200
|
0 |
0 |
if (scalar keys %params == 0 and $self->{'data'}) |
|
201
|
0 |
0 |
if ($self->{'logger'}) |
|
210
|
19 |
0 |
if (scalar @args == 0) { } |
|
218
|
0 |
19 |
if ($self->{'logger'}) |
|
222
|
0 |
19 |
unless $sth->execute(@args) |
|
234
|
22 |
13 |
ref $_[0] eq 'HASH' ? : |
|
239
|
35 |
0 |
unless $self->{'table'} |
|
244
|
35 |
25 |
if (scalar @args == 0) { } |
|
252
|
4 |
31 |
if ($self->{'logger'}) |
|
256
|
0 |
35 |
unless $sth->execute(@args) |
|
263
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
268
|
0 |
0 |
unless $self->{'table'} |
|
271
|
0 |
0 |
if ($self->{'logger'}) |
|
275
|
0 |
0 |
unless $sth->execute |
|
299
|
0 |
1 |
if $column eq 'DESTROY' |
|
301
|
0 |
1 |
unless my $self = shift() |
|
306
|
1 |
0 |
unless $self->{$table} |
|
308
|
0 |
1 |
ref $_[0] eq 'HASH' ? : |
|
314
|
1 |
1 |
if (scalar @args == 0) { } |
|
323
|
1 |
0 |
if ($self->{'logger'}) |
|
327
|
0 |
1 |
unless $sth->execute(@args) |
|
329
|
0 |
1 |
if (wantarray) |
|
336
|
6 |
0 |
if (defined $^V and $^V ge 'v5.14.0') |
|
337
|
0 |
6 |
if ${^GLOBAL_PHASE} eq 'DESTRUCT' |
|
341
|
2 |
4 |
if ($self->{'temp'}) |