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