Branch Coverage

blib/lib/Sub/Parameters.pm
Criterion Covered Total %
branch 6 26 23.0


line true false branch
24 0 2 if ($data eq 'named')
50 0 1 if $] < 5.007002
58 0 1 unless my $fullname = $names{$referent}
70 0 2 unless $$frame{'sub'} and $sub == $$frame{'sub'}
77 0 2 if ($$frame{'data'} eq 'positional') { }
0 2 elsif ($$frame{'data'} eq 'named') { }
81 0 0 unless $offset = $$frame{'order'}{$name}
88 0 0 if ($sigil eq '@' or $sigil eq '%')
90 0 0 if $sigil eq '@'
92 0 0 if $sigil eq '%'
95 0 0 ref $value eq 'ARRAY' ? :
0 0 if $data ne 'rw'
103 0 0 if ($data eq 'rw') { }