| line |
true |
false |
branch |
|
47
|
0 |
3 |
if undef $opts |
|
50
|
0 |
3 |
if $$opts{'NoCreate'} and not defined $dbfp && -f $dbfp |
|
53
|
0 |
3 |
unless defined $dbfp |
|
55
|
0 |
3 |
$$opts{'ReadOnly'} ? : |
|
56
|
0 |
3 |
unless defined $dbh |
|
83
|
3 |
0 |
if @_ |
|
94
|
3 |
83 |
if @_ |
|
109
|
9 |
21 |
if (@_) |
|
110
|
6 |
3 |
if (defined $tbnm) { } |
|
119
|
0 |
30 |
if (defined $tbnm and not defined $$self{'tblc'}{$tbnm}) |
|
124
|
27 |
3 |
defined $tbnm ? : |
|
172
|
0 |
14 |
unless $self->dbi->begin_work |
|
201
|
0 |
1 |
unless $self->dbi->begin_work |
|
223
|
0 |
19 |
if ref $opts eq 'HASH' and $$opts{'Distinct'} |
|
227
|
0 |
19 |
if (ref $opts eq 'HASH' and ref $$opts{'Columns'} eq 'ARRAY') { } |
|
239
|
0 |
19 |
if ref $opts eq 'HASH' and $$opts{'Suffix'} |
|
241
|
0 |
19 |
if ref $opts eq 'HASH' and defined $$opts{'ReturnType'} and not $$opts{'ReturnType'} eq 'Array' || $$opts{'ReturnType'} eq 'Hash' |
|
251
|
10 |
9 |
if (ref $opts eq 'HASH' and defined $$opts{'ReturnType'} and $$opts{'ReturnType'} eq 'Hash') { } |
|
253
|
9 |
1 |
if (ref $opts eq 'HASH' and $$opts{'FirstRow'}) { } |
|
266
|
7 |
2 |
if (ref $opts eq 'HASH' and $$opts{'FirstRow'}) { } |
|
289
|
0 |
1 |
if ref $opts ne 'HASH' or not defined $$opts{'Where'} || $$opts{'RemoveAll'} |
|
369
|
15 |
0 |
if (ref $opts eq 'HASH') { } |
|
370
|
12 |
3 |
if (ref $$opts{'Data'} eq 'HASH') { } |
|
|
1 |
2 |
elsif (ref $$opts{'Columns'} eq 'ARRAY') { } |
|
396
|
15 |
0 |
if (ref $opts eq 'HASH' and ref $$opts{'Data'}) |
|
398
|
12 |
3 |
if (ref $$opts{'Data'} eq 'HASH') { } |
|
|
3 |
0 |
elsif (ref $$opts{'Data'} eq 'ARRAY') { } |
|
402
|
1 |
11 |
if (ref $$opts{'Data'}{$$clnm[0]} eq 'ARRAY') { } |
|
418
|
1 |
2 |
if (ref $$opts{'Data'}[0] eq 'ARRAY') { } |
|
446
|
21 |
0 |
if (ref $opts eq 'HASH' and defined $$opts{'Where'}) |
|
447
|
19 |
2 |
if (ref $$opts{'Where'} eq 'HASH') { } |
|
469
|
15 |
0 |
if (defined $data) { } |
|
472
|
0 |
20 |
unless $sth->execute(@$row) |
|
475
|
0 |
15 |
unless ($self->dbi->commit) |
|
501
|
3 |
0 |
if defined $dbh |
|
527
|
7 |
0 |
if (ref $dbs eq 'DBI::db') { } |
|
531
|
0 |
0 |
unless -f $dbf |
|
534
|
0 |
0 |
unless defined $dbh |
|
541
|
0 |
7 |
unless ref $dbs eq 'DBI::db' |
|
542
|
0 |
7 |
defined $a ? : |