blib/lib/Teng.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 49 | 74 | 66.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
208 | 1 | 48 | 3 | $self->owner_pid and $self->owner_pid != $$ |
262 | 0 | 0 | 0 | $self->owner_pid && $dbh->ping |
301 | 270 | 1 | 327 | &Scalar::Util::blessed($v) and ref $v eq "SQL::Maker::SQLType" |
419 | 0 | 0 | 51 | %where and $refetch |
441 | 2 | 0 | 0 | $dbh->{'Driver'}{'Name'} eq 'Pg' && $dbh->{'pg_server_version'} >= 82000 |
591 | 5 | 0 | 1 | ref $args->{$1} and ref $args->{$1} eq "ARRAY" |
768 | 1 | 85 | 1 | $self->owner_pid and $self->owner_pid != $$ |
86 | 0 | 1 | $self->owner_pid and $self->owner_pid != $$ and my $dbh = $self->{'dbh'} |
line | l | !l | condition |
---|---|---|---|
43 | 1 | 65 | delete $opt->{'alias'} || {} |
72 | 0 | 91 | $args{'trace_ignore_if'} || \&Teng::_noop |
224 | 2 | 87 | $self->{'sql_builder_class'} || 'Teng::QueryBuilder' |
362 | 0 | 166 | $prefix ||= "INSERT INTO" |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
47 | 2 | 66 | 0 | $alias->{$method} || $method |
76 | 4 | 1 | 86 | $loader or $self->schema |
87 | 20 | 71 | 0 | $self->connect_info or $self->{'dbh'} |
144 | 1 | 0 | 0 | $@ || $DBI::errstr |
192 | 1 | 0 | 0 | $@ || $DBI::errstr |
239 | 0 | 1 | 725 | not $self->owner_pid or $self->owner_pid != $$ |
243 | 60 | 653 | 12 | $self->no_ping || $dbh->ping |
292 | 4 | 0 | 415 | $ENV{'TENG_SQL_COMMENT'} or $self->sql_comment |
514 | 29 | 36 | 0 | $self->{'txn_manager'} ||= $self->{'txn_manager_class'} ? $self->{'txn_manager_class'}->new($self->dbh) : "DBIx::TransactionManager"->new($self->dbh) |
564 | 3 | 171 | 0 | $opt->{'columns'} || $table->{'escaped_columns'}{$self->{'driver_name'}} |
652 | 36 | 19 | 1 | $table_name ||= $self->_guess_table_name($sql) |
672 | 4 | 0 | 51 | $self->{'apply_sql_types'} || $self->{'guess_sql_types'} |
679 | 2 | 0 | 0 | $table_name ||= $self->_guess_table_name($sql) |
718 | 1 | 3 | 0 | $sql || do { |