Branch Coverage

blib/lib/constant/lexical.pm
Criterion Covered Total %
branch 8 22 36.3


line true false branch
77 1 10 unless @_
79 1 9 if (@_ == 1 and ref $_[0] eq 'HASH') { }
8 1 elsif (@_ == 2) { }
115 0 11 unless defined $_
117 11 0 if (/$normal_constant_name/ and not $keywords{$_}) { }
0 0 elsif (/^__/) { }
0 0 elsif (/$tolerable/) { }
0 0 elsif (/$boolean/) { }
128 0 0 if (warnings::enabled())
129 0 0 if ($keywords{$_})
138 0 0 if (@_) { }