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'} |