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