| blib/lib/DBIx/DBO.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 36 | 44 | 81.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 134 | 5 | 13 | 1 | defined $new and not UNIVERSAL::isa($new, "HASH") |
| 145 | 3 | 1 | 1 | $dbh and $dbh->{'Driver'}{'Name'} ne $rdbh->{'Driver'}{'Name'} |
| 229 | 2 | 4 | 0 | defined $conn_idx and $ConnectArgs[$conn_idx] |
| 416 | 491 | 3 | 1 | exists $me->{$c} and not $me->{$d}->ping |
| line | l | !l | condition |
|---|---|---|---|
| 167 | 1 | 0 | $me->{'ConnectArgs'} //= scalar @ConnectArgs |
| 188 | 2 | 2 | $me->{'ConnectReadOnlyArgs'} //= scalar @ConnectArgs |
| 364 | 11 | 18 | $schema // "" |
| 366 | 11 | 17 | $schema // "" |
| 422 | 0 | 34 | $me->config('UseHandle') || 'read-write' |
| 491 | 18 | 2 | $me->{'Config'} //= {} |
| 495 | 542 | 8 | $me->{'Config'} //= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 140 | 3 | 8 | 0 | $new->{'dbd'} //= $dbh->{'Driver'}{'Name'} |
| 147 | 1 | 3 | 0 | $new->{'dbd'} //= $rdbh->{'Driver'}{'Name'} |
| 211 | 0 | 6 | 2 | ref($me) =~ /::DBD::\Q$driver\E$/u or $driver eq $me->{'dbd'} |
| 361 | 2 | 9 | 18 | $schema //= $me->{'dbd_class'}->_get_table_schema($me, $table) |
| 412 | 34 | 463 | 0 | $type ||= defined $me->{'rdbh'} ? "read-only" : "read-write" |
| 501 | 8 | 0 | 8 | ref $me->{'dbh'} or ref $me->{'rdbh'} |