| blib/lib/Const/Dual.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 57 | 0 | 5 | $] >= 5.008 && $] < 5.015004 ? : |
| 66 | 4 | 8 | ref $_[0] ? : |
| 67 | 1 | 11 | if $storehash and ref $storehash ne 'HASH' |
| 68 | 1 | 10 | if @_ % 2 |
| 72 | 1 | 15 | if ref $name or not $name =~ /^[a-zA-Z_][a-zA-Z0-9_]*$/ |
| 73 | 1 | 14 | if $forbidden{$name} |
| 75 | 8 | 6 | &Scalar::Util::looks_like_number($value) ? : |
| 76 | 6 | 8 | if $storehash |
| 78 | 0 | 14 | if _DOWNGRADE() and utf8::is_utf8($name) |