line |
true |
false |
branch |
61
|
6 |
0 |
if (@_) { } |
62
|
6 |
0 |
wantarray ? : |
71
|
10 |
2 |
unless $lexer |
75
|
10 |
0 |
if (defined $_[1]) { } |
131
|
5 |
3 |
if ($$self[$PENDING_TOKEN]) |
144
|
0 |
0 |
unless $$self[$PENDING_TOKEN] |
161
|
0 |
0 |
if (defined $_[0]) { } |
176
|
0 |
0 |
if (@_) { } |
186
|
0 |
0 |
if (@_) { } |
201
|
0 |
0 |
if (defined $_[0]) { } |
209
|
0 |
0 |
if (defined $_[0]) { } |
219
|
0 |
10 |
if (defined $_[0]) { } |
235
|
0 |
4 |
if ($^W and @{$$self[$TOKEN_LIST];} == 0) |
260
|
0 |
5 |
if $debug |
261
|
2 |
3 |
if (ref $fd) { } |
|
3 |
0 |
elsif (defined $_[0]) { } |
|
0 |
0 |
elsif ($$self[$STREAM]) { } |
263
|
0 |
2 |
if $debug |
265
|
1 |
1 |
if (@{$$self[$LEXER_STREAM_CODE];}) { } |
266
|
0 |
1 |
if ($$self[$FROM_STRING]) |
267
|
0 |
0 |
if $debug |
274
|
0 |
1 |
if $debug |
284
|
0 |
3 |
if $debug |
285
|
0 |
3 |
if (@{$$self[$LEXER_STRING_CODE];}) { } |
286
|
0 |
0 |
unless ($$self[$FROM_STRING]) |
287
|
0 |
0 |
if $debug |
294
|
0 |
3 |
if $debug |
320
|
0 |
0 |
if (not defined($record = <$fh>)) { } |
337
|
0 |
0 |
if ($class) { } |
338
|
0 |
0 |
if ($$self[$TRACE]) { } |
359
|
0 |
0 |
if (ref $self) { } |
384
|
6 |
0 |
if (ref $self) { } |
385
|
0 |
6 |
if (defined $_[0] and $_[0] ne $$self[$SKIP]) { } |
386
|
0 |
0 |
if $debug |
399
|
0 |
0 |
if $debug |
401
|
0 |
0 |
defined $_[0] ? : |
423
|
0 |
0 |
if ($key =~ /^[Ff]rom$/) { } |
|
0 |
0 |
elsif ($key =~ /^[Ss]kip$/) { } |
|
0 |
0 |
elsif ($key =~ /^[Tt]okens$/) { } |
428
|
0 |
0 |
unless (ref $value eq 'ARRAY') |
447
|
0 |
15 |
if ($class = ref $receiver) { } |
460
|
0 |
3 |
if ($class eq 'Parse::ALex') |
469
|
3 |
0 |
if (@_) |
489
|
2 |
12 |
if (defined $_[0]) { } |
515
|
3 |
1 |
if ($$self[$FROM_STRING]) { } |
539
|
3 |
1 |
if ($$self[$FROM_STRING]) { } |
576
|
0 |
4 |
unless (@code) |
590
|
4 |
4 |
if (@_) { } |
660
|
0 |
4 |
if ($@ or $debug) |
666
|
0 |
0 |
if $@ |
676
|
0 |
0 |
if (ref $$self[$LEXER_SUB] eq 'CODE') { } |
688
|
10 |
0 |
if (ref $self) { } |
689
|
0 |
10 |
if (@_) { } |
700
|
10 |
0 |
if (ref $self) { } |
701
|
0 |
10 |
if (@_) { } |
714
|
0 |
6 |
if $specif =~ /^ALL:/ |
718
|
6 |
0 |
unless $specif or keys %exclusion |
725
|
0 |
0 |
if ($specif =~ /^(.+):/g) |
729
|
0 |
0 |
unless ($cond_item eq 'INITIAL' or defined $exclusion{$cond_item} or defined $inclusion{$cond_item}) |
740
|
0 |
0 |
if (@condition == 1) { } |
747
|
0 |
0 |
if (@tmp = map({"\$$_";} keys %exclusion)) |
748
|
0 |
0 |
if ($condition) { } |
755
|
0 |
0 |
$condition ne '' ? : |
797
|
0 |
8 |
if (@_) { } |
806
|
0 |
0 |
if ($state eq 'INITIAL') { } |
809
|
0 |
0 |
if (exists $$self[$EXCLUSIVE_COND]{$state}) |
846
|
0 |
0 |
unless (defined $_[0]) |
864
|
0 |
0 |
unless (defined $_[0]) |
884
|
0 |
21 |
unless (@_ == 1) |
888
|
21 |
0 |
if (ref $_[0]) { } |
891
|
3 |
18 |
$token == $Parse::Token::EOI ? : |
904
|
0 |
0 |
if (not $ref or $ref ne 'CODE') |