| blib/lib/Embperl/Syntax.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 8 | 11 | 72.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 216 | 0 | 0 | 62 | not $names{$_} and /^\s*([a-zA-Z_0-9:]+)\s*$/ |
| line | l | !l | condition |
|---|---|---|---|
| 148 | 8 | 0 | $$ttref{'procinfo'}{$$self{-'procinfotype'}} ||= {} |
| 266 | 82 | 11 | $new ||= {} |
| 267 | 83 | 10 | $replace ||= {} |
| 268 | 82 | 11 | $seen ||= {$old, $new} |