| line |
true |
false |
branch |
|
16
|
1 |
5 |
if (my $this_policies_arg = $args->{'prohibit_complex_version'}) |
|
25
|
72 |
298 |
if ($token_type == 91) { } |
|
|
2 |
587 |
elsif ($token_type == 94 and $token_data eq 'version') { } |
|
32
|
1 |
71 |
if ($token_type == 107) { } |
|
|
71 |
0 |
elsif ($token_type == 166 || $token_type == 194 and $token_data eq '$VERSION') { } |
|
37
|
0 |
2 |
if ($token_type == 107) { } |
|
|
1 |
1 |
elsif ($token_type == 108) { } |
|
|
1 |
0 |
elsif ($token_type == 166 || $token_type == 194 and $token_data eq '$VERSION') { } |
|
41
|
1 |
0 |
if (--$left_paren_num <= 0) |
|
60
|
72 |
0 |
if ($is_version_assigned) |
|
66
|
11 |
61 |
if ($token_type == 166 or $token_type == 194) { } |
|
|
16 |
45 |
elsif ($token_type == 172) { } |
|
|
2 |
43 |
elsif ($token_type == 146) { } |
|
|
5 |
38 |
elsif ($token_type == 127) { } |
|
|
9 |
29 |
elsif ($token_type == 107) { } |
|
|
3 |
52 |
elsif ($token_type == 87 or $token_type == 70 and $token_data eq 'eval') { } |
|
70
|
9 |
2 |
if ($token_data ne '$VERSION' and $token_data =~ /\A\$[A-Z0-9_]+\Z/ or $next_token->{'type'} == 126) |
|
84
|
1 |
15 |
if ($token_data =~ /\A\$(?:\S+::)+\S+\Z/) |
|
97
|
1 |
1 |
if ($token->{'data'} =~ /\A\$(?:\S+::)+\S+\Z/) |
|
109
|
5 |
0 |
if ($token->{'type'} == 126) |
|
123
|
79 |
1408 |
if ($token_type == 107) { } |
|
|
83 |
1325 |
elsif ($token_type == 108) { } |
|
|
2 |
1323 |
elsif ($token_type == 126) { } |
|
127
|
8 |
75 |
if (--$left_paren_num <= 0) |
|
144
|
3 |
0 |
if ($token->{'type'} == 109) |
|
148
|
0 |
33 |
if ($token_type == 109) { } |
|
|
3 |
30 |
elsif ($token_type == 110) { } |
|
|
3 |
27 |
elsif ($token_type == 126) { } |
|
152
|
3 |
0 |
if (--$left_brace_num <= 0) |
|
171
|
1 |
1 |
if ($forbid_use_version) |