| line |
true |
false |
branch |
|
53
|
1355 |
25928 |
if ($c eq '*') { } |
|
|
16923 |
9005 |
elsif ($c eq '$') { } |
|
|
2770 |
6235 |
elsif ($c eq '@') { } |
|
|
1432 |
4803 |
elsif ($c eq '%') { } |
|
|
1270 |
3533 |
elsif ($c eq '&') { } |
|
|
1968 |
1565 |
elsif ($c eq '-') { } |
|
|
1565 |
0 |
elsif ($c eq ':') { } |
|
55
|
83 |
1272 |
if ($char =~ /\d/) |
|
61
|
419 |
853 |
if ($char =~ /[\w:]/) |
|
64
|
407 |
12 |
unless ($prev and $prev->isa("PPI::Token::Number")) |
|
70
|
24 |
841 |
if ($char eq "{") |
|
73
|
0 |
24 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
81
|
40 |
825 |
if ($char eq "*") |
|
83
|
1 |
38 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
89
|
73 |
791 |
if ($char eq "*" or $char eq "=") |
|
95
|
105 |
686 |
if $self->_is_cast_or_op($char) |
|
104
|
154 |
16769 |
if ($char eq "*" or $char eq "#") |
|
106
|
2 |
68 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
112
|
15832 |
1089 |
if ($char =~ /[a-z_]/i) |
|
118
|
937 |
152 |
if ($PPI::Token::Unknown::MAGIC{$c . $char}) |
|
124
|
25 |
127 |
if ($char eq "{") |
|
127
|
4 |
21 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
142
|
11 |
2759 |
if ($char eq "*") |
|
144
|
1 |
8 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
150
|
1933 |
836 |
if ($char =~ /[\w:]/) |
|
156
|
28 |
808 |
if ($PPI::Token::Unknown::MAGIC{$c . $char}) |
|
162
|
253 |
555 |
if ($char eq "{") |
|
165
|
1 |
252 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
180
|
37 |
1395 |
if ($char eq "*" or $char eq "[") |
|
182
|
2 |
33 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
183
|
1 |
1 |
if ($char eq "*") |
|
187
|
1 |
0 |
if ($char eq "[") |
|
195
|
103 |
1327 |
if ($char =~ /\d/) |
|
202
|
240 |
1087 |
if ($char eq "^" or $PPI::Token::Unknown::MAGIC{$c . $char}) |
|
207
|
402 |
685 |
if ($char =~ /[\w:]/) |
|
210
|
397 |
5 |
unless ($prev and $prev->isa("PPI::Token::Number")) |
|
216
|
45 |
645 |
if ($char eq "{") |
|
219
|
1 |
44 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
226
|
160 |
529 |
if $self->_is_cast_or_op($char) |
|
236
|
9 |
1261 |
if ($char eq "*") |
|
238
|
1 |
7 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
245
|
95 |
1174 |
if ($char =~ /\d/) |
|
251
|
229 |
945 |
if ($char =~ /[\w:]/) |
|
254
|
216 |
13 |
unless ($prev and $prev->isa("PPI::Token::Number")) |
|
260
|
100 |
858 |
if $self->_is_cast_or_op($char) |
|
269
|
125 |
1843 |
if ($char =~ /\d/o) |
|
275
|
9 |
1834 |
if ($char eq ".") |
|
281
|
215 |
1619 |
if ($char =~ /[a-zA-Z]/) |
|
293
|
9 |
1556 |
if ($char eq ":") |
|
302
|
923 |
633 |
if ($self->__TOKENIZER__is_an_attribute($t)) |
|
320
|
158 |
2280 |
if $char eq "\$" |
|
321
|
33 |
2247 |
if $char eq "\@" |
|
322
|
37 |
2210 |
if $char eq "%" |
|
323
|
35 |
2175 |
if $char eq "*" |
|
324
|
102 |
2073 |
if $char eq "{" |
|
339
|
150 |
499 |
unless $token->significant |
|
340
|
34 |
465 |
if $extra_check and not &$extra_check($token) |
|
355
|
23 |
342 |
unless $token |
|
357
|
35 |
307 |
if ($token->isa("PPI::Token::Structure") and $token->content eq "}") |
|
366
|
32 |
35 |
unless $token->isa("PPI::Token::Structure") |
|
367
|
1 |
34 |
if ($token eq "}") |
|
371
|
33 |
1 |
if ($token eq "{") |
|
373
|
1 |
32 |
if $structure_depth |
|
378
|
2 |
33 |
unless $token |
|
382
|
0 |
33 |
unless $token |
|
383
|
0 |
33 |
if $token->isa("PPI::Token::Symbol") |
|
386
|
9 |
24 |
if $meth_or_subscript_end{$token->content} |
|
391
|
5 |
19 |
$produces_or_wants_value ? : |
|
396
|
69 |
166 |
if $token->isa("PPI::Token::Structure") and $list_start_or_term_end{$token->content} or $token->isa("PPI::Token::Cast") or $token->isa("PPI::Token::Operator") or $token->isa("PPI::Token::Label") |
|
401
|
99 |
67 |
unless $token->isa("PPI::Token::Word") |
|
404
|
67 |
0 |
if not $token or $token->content ne "->" |
|
414
|
75 |
1481 |
unless $p0 |
|
417
|
176 |
1305 |
if $p0->isa("PPI::Token::Attribute") |
|
420
|
126 |
1179 |
if $p0->isa("PPI::Token::Prototype") |
|
423
|
532 |
647 |
unless $p0->isa("PPI::Token::Word") |
|
426
|
0 |
647 |
if ($p0->isa("PPI::Token::Word") and $p0->content eq "sub") |
|
433
|
108 |
0 |
if ($p1 and $p1->isa("PPI::Token::Word") and $p1->content eq "sub" and !$p2 || $p2->isa('PPI::Token::Structure') || $p2->isa('PPI::Token::Whitespace') && $p2->content eq '') |