Branch Coverage

blib/lib/Ima/DBI.pm
Criterion Covered Total %
branch 12 24 50.0


line true false branch
266 0 2 unless my $db_name = shift()
269 0 2 unless my $data_source = shift()
273 0 2 unless ref $attr eq 'HASH'
326 2 13 if ($process_id != $$ or not $dbh && $dbh->FETCH('Active') && $dbh->ping)
366 4 1 unless defined $cache
398 7 2 $cache ? :
450 0 2 unless $_[0]->__Database_Names
454 1 0 unless @db_names
470 0 1 unless $_[0]->__Statement_Names
544 0 0 if $@
577 0 0 grep((!$_), map($_->commit, $self->db_handles(@db_names))) ? :
596 0 0 grep((!$_), map($_->rollback, $self->db_handles(@db_names))) ? :