| blib/lib/Perl/Lint/Policy/NamingConventions/Capitalization.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 49 | 60 | 81.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 132 | 0 | 6 | 0 | $next_token->{'type'} and $next_token->{'type'} == 126 |
| 138 | 4 | 2 | 0 | $is_global_var and $globals{$token_data} |
| 184 | 0 | 642 | 36 | $next_token->{'type'} and $next_token->{'type'} == 126 |
| 190 | 286 | 356 | 0 | $is_global_var and $globals{$token_data} |
| 306 | 39 | 71 | 1 | $token_type == 129 and $token_data eq 'main' |
| 310 | 76 | 0 | 34 | $package_exemptions and $token_data =~ /\A$package_exemptions\Z/ |
| 409 | 6892 | 142 | 3 | $token_type == 127 and $token_data eq 'Readonly' |
| 6827 | 205 | 2 | $token_type == 122 and $token_data eq 'const' | |
| 412 | 0 | 0 | 3 | $token->{'type'} == 127 and $token->{'data'} eq 'Scalar' |
| line | l | !l | condition |
|---|---|---|---|
| 68 | 102 | 752 | $this_policies_rule->{'packages'} || '' |
| 69 | 34 | 820 | $this_policies_rule->{'package_exemptions'} || '' |
| 71 | 204 | 650 | $this_policies_rule->{'subroutines'} || '' |
| 72 | 34 | 820 | $this_policies_rule->{'subroutine_exemptions'} || '' |
| 74 | 272 | 582 | $this_policies_rule->{'local_lexical_variables'} || '' |
| 75 | 34 | 820 | $this_policies_rule->{'local_lexical_variable_exemptions'} || '' |
| 77 | 310 | 544 | $this_policies_rule->{'global_variables'} || '' |
| 78 | 71 | 783 | $this_policies_rule->{'global_variable_exemptions'} || '' |
| 80 | 68 | 786 | $this_policies_rule->{'labels'} || '' |
| 81 | 34 | 820 | $this_policies_rule->{'label_exemptions'} || '' |
| 131 | 6 | 0 | $$tokens[$i + 1] || {} |
| 183 | 678 | 0 | $$tokens[$i + 1] || {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 357 | 3 | 3 | 3 | $token_type == 127 or $token_type == 126 |
| 447 | 0 | 8 | 1 | $token->{'type'} != 94 or $token->{'data'} ne 'constant' |
| 583 | 130 | 176 | 26 | uc $part eq $part || lc $part eq $part |