blib/lib/constant/lexical.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 22 | 36.3 |
line | true | false | branch |
---|---|---|---|
77 | 1 | 9 | unless @_ |
79 | 1 | 8 | if (@_ == 1 and ref $_[0] eq 'HASH') { } |
7 | 1 | elsif (@_ == 2) { } | |
115 | 0 | 10 | unless defined $_ |
117 | 10 | 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 (@_) { } |