blib/lib/DBIx/Class/Storage/DBI/SQLite.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 10 | 35 | 28.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
93 | 0 | 0 | 0 | $dbname and -f $dbname |
131 | 14 | 0 | 0 | not &modver_gt_or_eq('DBD::SQLite', '1.33') and $self->_dbh->FETCH('AutoCommit') |
234 | 0 | 0 | 1 | not exists $sqltargs->{'producer_args'}{'sqlite_version'} and my $dver = $self->_server_info->{'normalized_dbms_version'} |
315 | 11587 | 355 | 30375 | defined $bindattrs->[$i] and defined $bind->[$i][1] |
11942 | 0 | 30375 | defined $bindattrs->[$i] and defined $bind->[$i][1] and grep {$bindattrs->[$i] eq $_;} &DBI::SQL_INTEGER(), &DBI::SQL_TINYINT(), &DBI::SQL_SMALLINT(), &DBI::SQL_BIGINT() |
line | l | !l | condition |
---|---|---|---|
83 | 0 | 0 | $dir ||= './' |
232 | 0 | 1 | $sqltargs ||= {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
216 | 0 | 0 | 143 | $ping_fail ||= !&dbic_internal_try(sub { $dbh->do('SELECT * FROM sqlite_master LIMIT 1'); 1; } ) |
327 | 2 | 0 | 0 | $bind->[$i][0]{'dbic_colname'} || "# $i" |
339 | 0 | 0 | 0 | $bind->[$i][1] > 2147483647 or $bind->[$i][1] < -2147483648 |
345 | 0 | 0 | 0 | $bind->[$i][0]{'dbic_colname'} || "# $i" |
line | l&&r | l&&!r | !l&&r | !l&&!r | condition |
---|---|---|---|---|---|
194 | 0 | 0 | 0 | 0 | $really_not_in_txn xor $dbh->{'AutoCommit'} |