| blib/lib/Parse/RecDescent/Topiary.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 22 | 28 | 78.5 |
| line | true | false | branch |
|---|---|---|---|
| 166 | 25 | 37 | ref $namespace ? : |
| 169 | 27 | 35 | if ($origpkg) |
| 170 | 16 | 11 | if $par{'ucfirst'} |
| 176 | 0 | 62 | if ($type eq 'ARRAY') { } |
| 27 | 35 | elsif ($type eq 'HASH') { } | |
| 178 | 0 | 0 | if ($class) { } |
| 179 | 0 | 0 | if (exists $par{'args'}) |
| 193 | 21 | 6 | if ($class) { } |
| 194 | 5 | 16 | if (exists $par{'args'}) |
| 204 | 0 | 35 | $class ? : |
| 212 | 48 | 11 | unless $$args{'consolidate'} |
| 213 | 2 | 9 | if ($key =~ /(\w+)\(\?\)$/) |
| 214 | 1 | 1 | unless @$tree |
| 225 | 16 | 21 | unless $pclass->can($method) |