Branch Coverage

blib/lib/DBIx/Squirrel/dr.pm
Criterion Covered Total %
branch 9 18 50.0


line true false branch
12 0 9 unless keys %DBIx::Squirrel::
20 11 0 if wantarray
26 0 4 unless UNIVERSAL::isa($_[0], "DBI::db")
28 0 4 @_ && UNIVERSAL::isa($_[$#_], 'HASH') ? :
33 4 7 if UNIVERSAL::isa($_[1], "DBI::db")
35 4 3 @_ && UNIVERSAL::isa($_[$#_], 'HASH') ? :
36 0 7 unless my $dbh = DBI::connect($invocant, @_, {%{$attrs;}, __PACKAGE__->_root_class})
43 0 0 @_ && UNIVERSAL::isa($_[$#_], 'HASH') ? :
46 0 0 unless my $dbh = DBI::connect_cached($invocant, @_, {%{$attributes;}, __PACKAGE__->_root_class})