Branch Coverage

blib/lib/Test/Stream/Plugin/SpecDeclare.pm
Criterion Covered Total %
branch 16 22 72.7


line true false branch
28 36 0 if ($var =~ /^([\@\%\$])/) { }
52 0 17 unless $hash
87 0 36 if $DEBUG
103 0 5 if $DEBUG
109 0 5 if $DEBUG
125 11 30 if ($start eq '"' or $start eq q[']) { }
29 1 elsif (my $nlen = Devel::Declare::toke_scan_word($offset, 1)) { }
148 1 40 unless defined $name
155 17 23 if ($start eq '(')
185 4 36 unless $start eq '{'
193 0 36 if $DEBUG