| blib/lib/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormattingExceptForSplit.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 10 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 53 | 5 | 18 | if $self->{'_minimum_regex_length_to_complain_about'} >= length $match |
| 54 | 6 | 12 | if _is_used_to_split($elem) |
| 57 | 7 | 5 | unless $re->modifier_asserted('x') |
| 68 | 11 | 7 | if (not $is_to_split and $elem->parent->isa('PPI::Statement::Expression')) |
| 81 | 6 | 64 | if ("$sib" eq 'split') |