blib/lib/Require/HookChain.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 22 | 72.7 |
line | true | false | branch |
---|---|---|---|
16 | 1 | 132 | if $ref |
68 | 0 | 13 | if ($_[$i] eq '-debug') { } |
1 | 12 | elsif ($_[$i] =~ /\A-/) { } | |
81 | 0 | 12 | if $debug |
83 | 11 | 1 | unless (@INC and blessed($INC[0]) and $INC[0] == $our_hook) |
91 | 1 | 12 | if ($el eq '-end') { } |
0 | 12 | elsif ($el eq '-debug') { } | |
101 | 0 | 0 | $end ? : |
0 | 12 | if $debug | |
105 | 1 | 11 | if ($end) { } |
130 | 24 | 278 | if (@_) { } |