| blib/lib/Perl/Critic/Policy/References/ProhibitDoubleSigils.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 10 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 31 | 0 | 0 | if $content eq "\\" |
| 32 | 0 | 0 | if $content =~ /[@ $ % * &] [*]/msx |
| 33 | 0 | 0 | if $content eq "\$#*" |
| 36 | 0 | 0 | unless $sib |
| 37 | 0 | 0 | unless ($sib->isa("PPI::Structure::Block") or $sib->isa("PPI::Structure::Subscript")) |