blib/lib/DBIx/DBO.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 29 | 39 | 74.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
146 | 7 | 10 | 1 | defined $new and not UNIVERSAL::isa($new, 'HASH') |
156 | 3 | 1 | 1 | $dbh and $$dbh{'Driver'}{'Name'} ne $$rdbh{'Driver'}{'Name'} |
236 | 2 | 0 | 4 | defined $conn_idx and $ConnectArgs[$conn_idx] |
373 | 0 | 0 | 24 | defined $table and length $table |
436 | 296 | 3 | 1 | exists $$me{$c} and not $$me{$d}->ping |
531 | 24 | 8 | 0 | defined $stash{$_} and $$me{$_} = $stash{$_} |
line | l | !l | condition |
---|---|---|---|
442 | 0 | 34 | $me->config('UseHandle') || 'read-write' |
510 | 13 | 2 | $$me{'Config'} ||= {} |
514 | 346 | 7 | $$me{'Config'} ||= {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
152 | 3 | 7 | 0 | $$new{'dbd'} ||= $$dbh{'Driver'}{'Name'} |
159 | 1 | 3 | 0 | $$new{'dbd'} ||= $$rdbh{'Driver'}{'Name'} |
225 | 0 | 6 | 2 | ref($me) =~ /::DBD::\Q$driver\E$/ or $driver eq $$me{'dbd'} |
432 | 34 | 268 | 0 | $type ||= defined $$me{'rdbh'} ? 'read-only' : 'read-write' |
521 | 8 | 0 | 8 | ref $$me{'dbh'} or ref $$me{'rdbh'} |