Condition Coverage

blib/lib/Catmandu/Store/MongoDB.pm
Criterion Covered Total %
condition 4 14 28.5


or 2 conditions

line l !l condition
26 0 0 $self->{'_args'}{'host'} // 'mongodb://localhost:27017'

or 3 conditions

line l !l&&r !l&&!r condition
46 0 1 1 $key eq 'client' or $key eq 'database_name'
1 0 1 $key eq 'client' or $key eq 'database_name' or $key eq 'database'
73 0 0 0 eval { do { $session->commit_transaction; 1 } } // do { my $err = $@; if ($err->has_error_label('UnknownTransactionCommitResult')) { redo COMMIT; } else { die $err; } }
87 0 0 0 eval { do { $self->set_session($session); $session->start_transaction; @res = &$sub(); COMMIT: { eval { do { $session->commit_transaction; 1 } } // do { my $err = $@; if ($err->has_error_label('UnknownTransactionCommitResult')) { redo COMMIT; } else { die $err; } }; } ; $self->clear_session; 1 } } // do { my $err = $@; $session->abort_transaction; $self->clear_session; die $err }