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 (@_) { } |