| line |
true |
false |
branch |
|
19
|
0 |
2 |
if $drh |
|
22
|
0 |
2 |
unless $drh = DBI::_new_drh($class, {"Name", "D1", "Version", $VERSION, "Err", \$err, "Errstr", \$errstr, "State", \$sqlstate, "Attribution", "DBD::D1"}) |
|
47
|
0 |
0 |
'HTTP::Tiny'->can_ssl ? : |
|
53
|
0 |
0 |
unless (_ssl_available()) |
|
64
|
0 |
0 |
$params && @$params ? : |
|
81
|
0 |
0 |
if ($res->{'content'}) |
|
85
|
0 |
0 |
unless ($res->{'success'}) |
|
87
|
0 |
0 |
if ($res->{'status'} == 599 and $detail =~ /ssl|IO::Socket/i) |
|
95
|
0 |
0 |
if ($data and ref $data eq "HASH") |
|
96
|
0 |
0 |
unless ($data->{'success'}) |
|
98
|
0 |
0 |
if (@$errs) |
|
108
|
0 |
0 |
unless ($data) |
|
110
|
0 |
0 |
if ($@) |
|
113
|
0 |
0 |
unless ($data->{'success'}) |
|
115
|
0 |
0 |
@$errs ? : |
|
140
|
2 |
0 |
if defined $k and defined $v |
|
146
|
1 |
1 |
unless my $account_id = $dsnargs{'account_id'} |
|
150
|
1 |
0 |
unless my $database_id = $dsnargs{'database_id'} |
|
154
|
0 |
0 |
unless my $api_token = $auth || $dsnargs{'api_token'} |
|
201
|
0 |
0 |
if $dbh->{'Warn'} |
|
208
|
0 |
0 |
if $dbh->{'Warn'} |
|
228
|
0 |
0 |
if $sth and $sth->execute |
|
238
|
0 |
0 |
if $attr eq "AutoCommit" |
|
239
|
0 |
0 |
if $attr =~ /^d1_/ |
|
245
|
0 |
0 |
if ($attr eq "AutoCommit") |
|
246
|
0 |
0 |
unless $val |
|
249
|
0 |
0 |
if ($attr =~ /^d1_/) |
|
267
|
0 |
0 |
unless my $sth_raw = $dbh->prepare(qq[PRAGMA table_info("$table")]) |
|
269
|
0 |
0 |
unless $sth_raw->execute |
|
282
|
0 |
0 |
$row->{'notnull'} ? : |
|
305
|
0 |
0 |
if $type =~ /INT/ |
|
306
|
0 |
0 |
if $type =~ /CHAR|TEXT|CLOB/ |
|
307
|
0 |
0 |
if $type =~ /REAL|FLOA|DOUB/ |
|
308
|
0 |
0 |
if $type =~ /BLOB/ |
|
331
|
0 |
0 |
@bind_values ? : |
|
343
|
0 |
0 |
if (defined $err) |
|
348
|
0 |
0 |
ref $result eq 'ARRAY' ? : |
|
352
|
0 |
0 |
if (@$rows) { } |
|
381
|
0 |
0 |
unless my $data = $sth->{'d1_result_data'} |
|
384
|
0 |
0 |
if ($cursor >= scalar @$data) |
|
401
|
0 |
0 |
if defined $max_rows and @result >= $max_rows |
|
402
|
0 |
0 |
if (not defined $slice) { } |
|
|
0 |
0 |
elsif (ref $slice eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $slice eq 'ARRAY') { } |
|
407
|
0 |
0 |
keys %$slice ? : |
|
430
|
0 |
0 |
if $attr =~ /^d1_/ |
|
436
|
0 |
0 |
if ($attr =~ /^d1_/) |