| blib/lib/PerlX/QuoteOperator.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 18 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 1 | 9 | unless $name and $param |
| 22 | 9 | 0 | unless ($caller) |
| 56 | 5 | 11 | if ($$self{$parser}) { } |
| 61 | 2 | 3 | if ($closer eq $opener) { } |
| 84 | 0 | 16 | if $$self{$debug} |
| 91 | 1 | 4 | if $d eq '(' |
| 92 | 1 | 3 | if $d eq '{' |
| 93 | 1 | 2 | if $d eq '[' |
| 94 | 0 | 2 | if $d eq '<' |