Branch Coverage

blib/lib/Database/ManagedHandle.pm
Criterion Covered Total %
branch 18 30 60.0


line true false branch
35 3 0 if ($ENV{'DATABASE_MANAGED_HANDLE_CONFIG'})
43 0 3 if ($Database::ManagedHandle::EVAL_ERROR or not $r)
60 0 3 unless exists $config->{'default'}
61 0 3 unless exists $config->{'databases'}
63 0 3 unless exists $config->{'databases'}{$default}
67 0 20 unless exists $db->{$_}
79 2 12 unless $name
82 1 13 unless exists $config->{'databases'}{$name}
85 5 8 unless ($self->_verify_connection_working($dbh))
100 0 5 unless (defined $dbh)
114 5 8 unless defined $dbh
116 8 0 if ($dbh->{'Active'}) { }
119 0 8 if $Database::ManagedHandle::EVAL_ERROR
120 8 0 if (int $result) { }
141 0 0 if $Database::ManagedHandle::EVAL_ERROR