| blib/lib/Perl/Critic/Policy/ValuesAndExpressions/ProhibitAccessOfPrivateData.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 10 | 90.0 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 0 | 17 | unless $element->isa('PPI::Token::Symbol') |
| 28 | 2 | 15 | unless $sibling |
| 30 | 5 | 10 | unless $sibling->isa('PPI::Token::Operator') and $sibling eq '->' |
| 35 | 3 | 25 | if $next_sibling->isa('PPI::Token::Structure') and $next_sibling eq ';' |
| 37 | 5 | 20 | if ($next_sibling->isa('PPI::Structure::Subscript') and not $element =~ /(?:self|class|package)/) |