blib/lib/Devel/GlobalPhase.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 12 | 66.6 |
line | true | false | branch |
---|---|---|---|
13 | 0 | 5 | "$]" >= 5.008009 && "$]" < 5.018 ? : |
14 | 5 | 0 | "$]" >= 5.014 ? : |
25 | 1 | 0 | $_ && $_ eq '-var' ? : |
30 | 3 | 1 | if (@imports or not $var) |
34 | 1 | 3 | if ($var) |
41 | 0 | 5 | unless eval "\nsub global_phase () {\n return \${^GLOBAL_PHASE};\n}\n\nsub tie_global_phase { 1 }\n\nsub _refresh_END () { 1 }\n\n1;\n\n" |