| blib/lib/DBIx/ThinSQL.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 9 | 26 | 34.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 138 | 0 | 94 | 0 | length $pair->[0] && $pair->[0] =~ /(JOIN)|(ON)/ |
| line | l | !l | condition |
|---|---|---|---|
| 503 | 0 | 0 | $self->fetchrow_arrayref || (return) |
| 509 | 0 | 0 | $self->fetchall_arrayref || (return) |
| 517 | 0 | 0 | $self->fetchrow_arrayref || (return) |
| 531 | 8 | 0 | $self->fetchall_arrayref || (return) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 140 | 2 | 0 | 92 | $bracket || $prefix . $join_on |
| 144 | 94 | 0 | 0 | length $pair->[0] or length $pair->[1] |
| 408 | 5 | 1 | 0 | $driver ||= ($self->{'private_DBIx_ThinSQL_driver'} = do { my $class = 'DBIx::ThinSQL::Driver::' . $self->{'Driver'}{'Name'}; (my $path = $class) =~ s[::][/]g; $path .= '.pm'; 'DBIx::ThinSQL::Driver'->new unless eval { do { require $path; $class->new } } }) |
| 681 | 0 | 0 | 1 | $like or $not_like |
| 0 | 0 | 1 | $like or $not_like or $gtlt |