| line |
true |
false |
branch |
|
317
|
2 |
0 |
unless ($args{'dsn'}) |
|
337
|
0 |
2 |
$args{'timeout'} ? : |
|
|
0 |
2 |
$args{'user'} ? : |
|
339
|
2 |
0 |
if $db |
|
344
|
2 |
0 |
if ($dbh and $dsn =~ /SQLite/i) |
|
346
|
1 |
1 |
unless ($file and -e $file and not -z $file) |
|
355
|
0 |
2 |
if (not $db) { } |
|
|
0 |
2 |
elsif (not $dbh) { } |
|
|
1 |
1 |
elsif ($fnew) { } |
|
363
|
2 |
0 |
unless ($error) |
|
364
|
0 |
2 |
unless $dbh->ping |
|
381
|
2 |
1 |
unless defined $err |
|
391
|
0 |
0 |
$self->{'issqlite'} ? : |
|
397
|
0 |
1 |
unless ($db) |
|
398
|
0 |
0 |
unless $self->error |
|
416
|
0 |
1 |
if (my $dberr = $db->connect->errstr) |
|
426
|
0 |
0 |
unless ($db) |
|
427
|
0 |
0 |
unless $self->error |
|
438
|
0 |
0 |
if (my $dberr = $db->connect->errstr) |
|
448
|
0 |
0 |
unless ($db) |
|
449
|
0 |
0 |
unless $self->error |
|
457
|
0 |
0 |
if ($file) { } |
|
462
|
0 |
0 |
if (my $dberr = $db->connect->errstr) |
|
472
|
0 |
0 |
unless ($db) |
|
473
|
0 |
0 |
unless $self->error |
|
479
|
0 |
0 |
if (my $dberr = $db->connect->errstr) |
|
493
|
0 |
0 |
unless ($db) |
|
494
|
0 |
0 |
unless $self->error |
|
502
|
0 |
0 |
if (my $dberr = $db->connect->errstr) |
|
515
|
2 |
0 |
is_array($in) ? : |
|
518
|
6 |
0 |
if $_ =~ /^\s*(\S+)\s+(.+)$/ |