line |
true |
false |
branch |
119
|
1 |
4 |
unless $hash{'driver'} |
120
|
1 |
3 |
unless $hash{'database'} or $hash{'dbfile'} |
124
|
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 $_ |