Branch Coverage

blib/lib/Sub/Block.pm
Criterion Covered Total %
branch 12 16 75.0


line true false branch
30 0 4 $_[2] ? :
41 0 20 if (@_ == 1 and ref $_[0] eq 'HASH') { }
12 8 elsif (@_ == 1 and ref $_[0] eq 'CODE') { }
75 126 2 if $name ne 'return' and $name ne 'wantarray'
109 4 0 unless ref $_[0]
111 6 2 &blessed($_) ? :
121 2 4 if exists $$vars{$k} and &refaddr($$vars{$k}) == &refaddr($$sub_closures{$k})
122 0 4 if exists $$vars{$k}