| blib/lib/PerlX/Assert/Keyword.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 14 | 85.7 |
| line | true | false | branch |
|---|---|---|---|
| 28 | 16 | 18 | if ($$ref =~ /\A(qq\b|q\b|'|")/u) |
| 34 | 8 | 8 | if ($$ref =~ /\A,/u) |
| 38 | 0 | 8 | if ($$ref =~ /\A\{/u) |
| 62 | 0 | 50 | $X == 2 ? : |
| 73 | 22 | 12 | $do ? : |
| 75 | 5 | 29 | unless $active |
| 78 | 16 | 13 | if defined $name |