| blib/lib/Pugs/Compiler/Regex.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 30 | 50.0 |
| line | l | !l | condition |
|---|---|---|---|
| 241 | 0 | 0 | $check and *$slot{'CODE'} |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 87 | 4 | 9 | 0 | not $NoCache and $cache |
| 13 | 0 | 0 | not $NoCache and $cache and $cached = $cache->get($digest) | |
| 210 | 0 | 10 | 0 | defined $flags and defined $$flags{'args'} |
| line | l | !l | condition |
|---|---|---|---|
| 54 | 0 | 13 | delete $$param{'grammar'} || 'Pugs::Grammar::Base' |
| 56 | 4 | 9 | delete $$param{'ratchet'} || 0 |
| 64 | 2 | 11 | delete $$param{'sigspace'} || delete $$param{'s'} || 0 |
| 69 | 0 | 13 | delete $$param{'continue'} || delete $$param{'c'} || 0 |
| 74 | 0 | 13 | delete $$param{'ignorecase'} || delete $$param{'i'} || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 45 | 0 | 2 | 13 | exists $$param{'P5'} or exists $$param{'Perl5'} |
| 59 | 0 | 0 | 13 | delete $$param{'pos'} || delete $$param{'p'} |
| 171 | 0 | 0 | 10 | $grammar ||= $$rule{'grammar'} |