Branch Coverage

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') { }