| line |
true |
false |
branch |
|
53
|
1354 |
35040 |
if ($c eq '*') { } |
|
|
25369 |
9671 |
elsif ($c eq '$') { } |
|
|
2957 |
6714 |
elsif ($c eq '@') { } |
|
|
1477 |
5237 |
elsif ($c eq '%') { } |
|
|
1329 |
3908 |
elsif ($c eq '&') { } |
|
|
2022 |
1886 |
elsif ($c eq '-') { } |
|
|
1886 |
0 |
elsif ($c eq ':') { } |
|
55
|
82 |
1272 |
if ($char =~ /\d/) |
|
61
|
417 |
855 |
if ($char =~ /[\w:]/) |
|
64
|
400 |
17 |
unless ($prev and $prev->isa("PPI::Token::Number")) |
|
70
|
24 |
848 |
if ($char eq "{") |
|
73
|
0 |
24 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
81
|
36 |
836 |
if ($char eq "*") |
|
83
|
1 |
34 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
89
|
68 |
803 |
if ($char eq "*" or $char eq "=") |
|
95
|
96 |
707 |
if $self->_is_cast_or_op($char) |
|
104
|
130 |
25239 |
if ($char eq "*" or $char eq "#") |
|
106
|
2 |
41 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
112
|
24239 |
1128 |
if ($char =~ /[a-z_]/i) |
|
120
|
12 |
1116 |
if ($noname{$char} and $t->_current_token_has_signatures_active) |
|
125
|
939 |
177 |
if ($PPI::Token::Unknown::MAGIC{$c . $char}) |
|
131
|
26 |
151 |
if ($char eq "{") |
|
134
|
4 |
22 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
149
|
10 |
2947 |
if ($char eq "*") |
|
151
|
1 |
8 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
157
|
2079 |
877 |
if ($char =~ /[\w:]/) |
|
164
|
1 |
876 |
if ($char eq ")" and $t->_current_token_has_signatures_active) |
|
169
|
34 |
842 |
if ($PPI::Token::Unknown::MAGIC{$c . $char}) |
|
175
|
274 |
568 |
if ($char eq "{") |
|
178
|
1 |
273 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
193
|
40 |
1437 |
if ($char eq "*" or $char eq "[") |
|
195
|
2 |
36 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
196
|
1 |
1 |
if ($char eq "*") |
|
200
|
1 |
0 |
if ($char eq "[") |
|
208
|
99 |
1376 |
if ($char =~ /\d/) |
|
215
|
2 |
1374 |
if ($char eq ")" and $t->_current_token_has_signatures_active) |
|
221
|
229 |
1145 |
if ($char eq "^" or $PPI::Token::Unknown::MAGIC{$c . $char}) |
|
226
|
444 |
701 |
if ($char =~ /[\w:]/) |
|
229
|
432 |
12 |
unless ($prev and $prev->isa("PPI::Token::Number")) |
|
235
|
55 |
658 |
if ($char eq "{") |
|
238
|
1 |
54 |
if ($t->{'line'} =~ /$PPI::Token::Unknown::CURLY_SYMBOL/cg) |
|
245
|
169 |
543 |
if $self->_is_cast_or_op($char) |
|
255
|
13 |
1316 |
if ($char eq "*") |
|
257
|
1 |
11 |
if ($prev and $prev->isa("PPI::Token::Operator") and $prev->content eq "->") |
|
264
|
105 |
1223 |
if ($char =~ /\d/) |
|
270
|
220 |
1003 |
if ($char =~ /[\w:]/) |
|
273
|
207 |
13 |
unless ($prev and $prev->isa("PPI::Token::Number")) |
|
279
|
106 |
910 |
if $self->_is_cast_or_op($char) |
|
288
|
149 |
1873 |
if ($char =~ /\d/o) |
|
294
|
6 |
1867 |
if ($char eq ".") |
|
300
|
224 |
1643 |
if ($char =~ /[a-zA-Z]/) |
|
312
|
5 |
1881 |
if ($char eq ":") |
|
321
|
926 |
955 |
if ($self->__TOKENIZER__is_an_attribute($t)) |
|
339
|
157 |
2374 |
if $char eq "\$" |
|
340
|
42 |
2332 |
if $char eq "\@" |
|
341
|
23 |
2309 |
if $char eq "%" |
|
342
|
37 |
2272 |
if $char eq "*" |
|
343
|
112 |
2160 |
if $char eq "{" |
|
358
|
161 |
523 |
unless $token->significant |
|
359
|
37 |
486 |
if $extra_check and not &$extra_check($token) |
|
374
|
24 |
347 |
unless $token |
|
376
|
38 |
309 |
if ($token->isa("PPI::Token::Structure") and $token->content eq "}") |
|
385
|
37 |
37 |
unless $token->isa("PPI::Token::Structure") |
|
386
|
0 |
37 |
if ($token eq "}") |
|
390
|
32 |
5 |
if ($token eq "{") |
|
392
|
0 |
32 |
if $structure_depth |
|
397
|
1 |
37 |
unless $token |
|
401
|
0 |
37 |
unless $token |
|
402
|
0 |
37 |
if $token->isa("PPI::Token::Symbol") |
|
405
|
9 |
28 |
if $meth_or_subscript_end{$token->content} |
|
410
|
5 |
23 |
$produces_or_wants_value ? : |
|
415
|
68 |
167 |
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") |
|
420
|
88 |
79 |
unless $token->isa("PPI::Token::Word") |
|
423
|
79 |
0 |
if not $token or $token->content ne "->" |
|
433
|
78 |
1803 |
unless $p0 |
|
436
|
176 |
1627 |
if $p0->isa("PPI::Token::Attribute") |
|
439
|
126 |
1501 |
if $p0->isa("PPI::Token::Prototype") |
|
442
|
557 |
944 |
unless $p0->isa("PPI::Token::Word") |
|
445
|
0 |
944 |
if ($p0->isa("PPI::Token::Word") and $p0->content eq "sub") |
|
452
|
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 '') |