| blib/lib/ex/constant/vars.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 16 | 87.5 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 4 | 10 | if ($type eq 'scalar') { } |
| 5 | 5 | elsif ($type eq 'array') { } | |
| 38 | 2 | 4 | unless @_ |
| 39 | 2 | 2 | if (@_ == 1 and $_[0] eq 'const') { } |
| 46 | 0 | 7 | unless $prefix =~ /^[\$\@\%]$/ |
| 47 | 2 | 5 | if ($prefix eq '$') { } |
| 2 | 3 | elsif ($prefix eq '@') { } | |
| 3 | 0 | elsif ($prefix eq '%') { } |