| line |
true |
false |
branch |
|
45
|
2 |
13 |
if exists $$param{'P5'} or exists $$param{'Perl5'} |
|
82
|
0 |
13 |
if %$param |
|
87
|
0 |
13 |
if (not $NoCache and $cache and $cached = $cache->get($digest)) { } |
|
98
|
0 |
0 |
unless (defined $ast) |
|
115
|
0 |
0 |
if ($$self{'ratchet'}) { } |
|
126
|
0 |
0 |
if $cache |
|
135
|
0 |
0 |
if $@ |
|
161
|
0 |
10 |
unless defined $str |
|
164
|
7 |
3 |
if (ref $grammar eq 'HASH') |
|
176
|
2 |
7 |
defined $$flags{'pos'} ? : |
|
|
1 |
9 |
defined $$flags{'p'} ? : |
|
182
|
4 |
6 |
defined $$flags{'continue'} ? : |
|
|
0 |
10 |
defined $$flags{'c'} ? : |
|
188
|
0 |
10 |
defined $$flags{'ignorecase'} ? : |
|
|
0 |
10 |
defined $$flags{'i'} ? : |
|
199
|
0 |
10 |
unless (defined $$rule{'code'}) |
|
201
|
0 |
0 |
unless (defined $$rule{'perl5'}) |
|
206
|
0 |
0 |
if $@ |
|
210
|
0 |
10 |
if defined $flags and defined $$flags{'args'} |
|
238
|
0 |
0 |
index($name, '::') > -1 ? : |
|
241
|
0 |
0 |
if $check and *$slot{'CODE'} |
|
248
|
0 |
0 |
if $@ |
|
251
|
0 |
0 |
defined $_[0] ? : |