blib/lib/selfvars.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 10 | 80.0 |
line | true | false | branch |
---|---|---|---|
12 | 4 | 2 | unless @_ |
16 | 7 | 0 | if (@_ and not $_[0] =~ /^-/) { } |
29 | 1 | 23 | unless exists $vars{"-$sym"} |
30 | 16 | 7 | unless defined $vars{"-$sym"} |
103 | 5 | 0 | if $] >= 5.006 |