| blib/lib/DBIx/Connector/Driver.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 2 | 3 | 66.6 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 12 | 20 | 12 | 0 | $DRIVERS{$driver} ||= do { my $subclass = "DBIx::Connector::Driver" . "::$driver"; eval "require $subclass"; $class = $subclass unless $@; bless {"driver", $driver}, $class } |