| line |
true |
false |
branch |
|
91
|
4 |
70 |
if $type eq "&" |
|
95
|
40 |
30 |
unless &_INSTANCE($after, "PPI::Structure") |
|
99
|
0 |
30 |
unless defined $braces |
|
100
|
18 |
12 |
if ($type eq '$') { } |
|
|
6 |
6 |
elsif ($type eq '@') { } |
|
|
6 |
0 |
elsif ($type eq '%') { } |
|
106
|
12 |
0 |
if $before and $before->isa("PPI::Token::Cast") and $cast_which_trumps_braces{$before->content} |
|
109
|
3 |
3 |
if $braces eq "[]" |
|
110
|
3 |
3 |
if $braces eq "{}" |
|
113
|
2 |
4 |
if $braces eq "{}" |
|
116
|
4 |
2 |
if $braces eq "[]" |
|
165
|
15040 |
12481 |
if ($t->{'line'} =~ /\G([\w:\']+)/cg) |
|
172
|
1251 |
26270 |
if ($content eq "\@_" or $content eq "\$_") |
|
178
|
19 |
26251 |
if ($content eq "\$::") |
|
181
|
17 |
2 |
if ($nextchar eq "|") |
|
188
|
52 |
26199 |
if ($content =~ /^[\$%*\@&]::(?:[^\w]|$)/) |
|
194
|
58 |
26141 |
if ($content =~ /^(?:\$|\@)\d+/) |
|
215
|
0 |
26141 |
unless $content =~ /$pattern/ |
|
217
|
47 |
26094 |
unless (length $1 eq length $content) |