Branch Coverage

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


line true false branch
69 0 0 unless @_
71 1 9 if (@_ == 1 and ref $_[0] eq 'HASH') { }
1 8 elsif (@_ == 2) { }
102 7 1 unless defined $_
104 0 0 if (/$normal_constant_name/ and not $keywords{$_}) { }
10 0 elsif (/^__/) { }
0 0 elsif (/$tolerable/) { }
0 0 elsif (/$boolean/) { }
115 0 0 if (warnings::enabled())
116 0 10 if ($keywords{$_})
125 0 0 if (@_) { }