blib/lib/Perl/Critic/Policy/RegularExpressions/ProhibitSingleCharAlternation.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
33 | 0 | 0 | unless $elem =~ /[|]/msx |
35 | 0 | 0 | unless my $re = $document->ppix_regexp_from_element($elem) |
36 | 0 | 0 | if $re->failures |
42 | 0 | 0 | unless $re->find_parents(sub { |
47 | 0 | 0 | if ($kid->isa('PPIx::Regexp::Token::Operator') and $kid->content eq '|') { } |
0 | 0 | elsif ($kid->significant) { } | |
52 | 0 | 0 | if @alternative == 1 and $alternative[0]->isa("PPIx::Regexp::Token::Literal") |
60 | 0 | 0 | if @alternative == 1 and $alternative[0]->isa("PPIx::Regexp::Token::Literal") |
62 | 0 | 0 | if (1 < @singles) |