blib/lib/variable.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 24 | 20.8 |
line | true | false | branch |
---|---|---|---|
26 | 1 | 3 | unless @_ |
30 | 0 | 3 | unless defined $name |
32 | 3 | 0 | if ($name =~ /^_?[^\W_\d]\w*\z/ and not $forbidden{$name}) { } |
0 | 0 | elsif ($forced_into_main{$name} and $caller ne 'main') { } | |
0 | 0 | elsif ($name =~ /^__/) { } | |
0 | 0 | elsif ($name =~ /^[A-Za-z_]\w*\z/) { } | |
0 | 0 | elsif ($name =~ /^[01]?\z/) { } | |
43 | 0 | 0 | if (warnings::enabled()) |
44 | 0 | 0 | if ($keywords{$name}) { } |
0 | 0 | elsif ($forced_into_main{$name}) { } | |
57 | 0 | 0 | if (@_) { } |
70 | 0 | 3 | if (@_ > 1) |