blib/lib/DBIx/Class/Storage/DBI/SQLite.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 11 | 35 | 31.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
91 | 0 | 0 | 0 | $dbname and -f $dbname |
129 | 14 | 0 | 0 | not &modver_gt_or_eq('DBD::SQLite', '1.33') and $self->_dbh->FETCH('AutoCommit') |
230 | 0 | 0 | 6 | not exists $sqltargs->{'producer_args'}{'sqlite_version'} and my $dver = $self->_server_info->{'normalized_dbms_version'} |
311 | 11564 | 356 | 30309 | defined $bindattrs->[$i] and defined $bind->[$i][1] |
11920 | 0 | 30309 | 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 |
---|---|---|---|
81 | 0 | 0 | $dir ||= './' |
228 | 3 | 3 | $sqltargs ||= {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
211 | 0 | 0 | 145 | $ping_fail ||= !&try(sub { $dbh->do('SELECT * FROM sqlite_master LIMIT 1'); 1; } ) |
323 | 2 | 0 | 0 | $bind->[$i][0]{'dbic_colname'} || "# $i" |
335 | 0 | 0 | 0 | $bind->[$i][1] > 2147483647 or $bind->[$i][1] < -2147483648 |
341 | 0 | 0 | 0 | $bind->[$i][0]{'dbic_colname'} || "# $i" |
line | l&&r | l&&!r | !l&&r | !l&&!r | condition |
---|---|---|---|---|---|
189 | 0 | 0 | 0 | 0 | $really_not_in_txn xor $dbh->{'AutoCommit'} |