blib/lib/DBIx/DBSchema/_util.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 14 | 35.7 |
line | true | false | branch |
---|---|---|---|
17 | 0 | 2 | if (ref $dbh) { } |
20 | 0 | 2 | unless $dbh =~ s/^dbi:(\w*?)(?:\((.*?)\))?://i |
22 | 0 | 2 | unless $driver = $1 |
27 | 0 | 2 | unless eval 'require "DBIx/DBSchema/DBD/$driver.pm"' and $driver |
34 | 0 | 1 | unless (ref $dbh or not @_) |
35 | 0 | 0 | unless $dbh = 'DBI'->connect($dbh, @_) |
44 | 0 | 0 | if (ref $$optref[0] eq 'HASH') { } |