Branch Coverage

blib/lib/Data/Monad/Base/Sugar.pm
Criterion Covered Total %
branch 14 16 87.5


line true false branch
19 30 151 if &blessed($ref) and $ref->can('capture')
21 60 91 ref $ref eq 'ARRAY' ? :
27 0 30 unless &blessed($result) and $result->isa(ref $self)
40 5 27 unless defined $block
53 0 5 unless @blocks
72 1 4 unless (@blocks)
105 11 74 if ($info->{'yield'}) { }
38 36 elsif (@blocks) { }