line |
true |
false |
branch |
119
|
1 |
4 |
unless $hash{'driver'} |
121
|
1 |
1 |
unless $hash{'database'} or $hash{'dbfile'} |
133
|
1 |
2 |
defined $hash{'AutoCommit'} ? : |
159
|
1 |
13 |
unless $sql |
163
|
1 |
12 |
unless $dbv->{'dbh'} |
168
|
1 |
12 |
if ($@ or not $sth) |
177
|
0 |
12 |
if ($@ or not $res) |
184
|
11 |
1 |
if ($type eq 'array') { } |
215
|
1 |
4 |
unless $sql |
219
|
0 |
4 |
unless $dbv->{'dbh'} |
224
|
1 |
3 |
if ($@ or not $sth) |
233
|
0 |
3 |
if ($@ or not $res) |
239
|
2 |
1 |
if ($type eq 'array') { } |
241
|
8 |
1 |
if (my $row = $sth->fetchrow_arrayref) { } |
246
|
8 |
1 |
if (my $row = $sth->fetchrow_hashref) { } |
294
|
2 |
13 |
unless $sql |
298
|
1 |
12 |
unless $dbv->{'dbh'} |
300
|
3 |
10 |
if ($idrequired) { } |
304
|
0 |
3 |
if ($@ or not $sth) |
313
|
0 |
3 |
if ($@ or not $res) |
318
|
0 |
3 |
if ($dbv->{'driver'} =~ /mysql/i) { } |
|
0 |
3 |
elsif ($dbv->{'driver'} =~ /pg/i) { } |
|
3 |
0 |
elsif ($dbv->{'driver'} =~ /sqlite/i) { } |
327
|
3 |
0 |
if $row = $sth->fetchrow_arrayref |
330
|
0 |
0 |
if $row = $sth->fetchrow_arrayref |
335
|
1 |
9 |
if ($@) |
373
|
2 |
3 |
unless $sql and @args |
377
|
0 |
3 |
unless $dbv->{'dbh'} |
384
|
1 |
1 |
unless $dbv and $dbv->{'repeat'} |
399
|
0 |
1 |
unless $sql |
403
|
0 |
1 |
unless $dbv->{'dbh'} |
408
|
0 |
1 |
if ($@ or not $sth) |
418
|
0 |
3 |
if ($@ or not $res) |
437
|
1 |
0 |
if $dbv->{'dbh'} |
448
|
1 |
0 |
if $dbv->{'dbh'} |
462
|
0 |
1 |
unless $_[0] |
465
|
0 |
1 |
if $dbv->{'driver'} =~ /csv/i |
469
|
0 |
1 |
unless $dbv->{'dbh'} |
520
|
0 |
2 |
if ($dbv->{'driver'} =~ /ODBC/) { } |
|
2 |
0 |
elsif ($dbv->{'driver'} =~ /SQLite/i) { } |
524
|
2 |
0 |
if $dbv->{'database'} |
525
|
0 |
2 |
if $dbv->{'dbhost'} |
526
|
0 |
2 |
if $dbv->{'dbport'} |
531
|
0 |
0 |
if $dbv->{'dbfile'} |
532
|
0 |
0 |
if $dbv->{'database'} |
533
|
0 |
0 |
if $dbv->{'dbhost'} |
534
|
0 |
0 |
if $dbv->{'dbport'} |
541
|
0 |
2 |
if $@ |
548
|
3 |
1 |
if defined $dbv->{'dbh'} |
553
|
0 |
1 |
unless $_ |