blib/lib/Regexp/Optimizer.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 14 | 92.8 |
line | true | false | branch |
---|---|---|---|
28 | 0 | 24 | unless $str =~ /$re_optimize/ |
29 | 7 | 17 | unless ($str =~ /[(]/ms) |
37 | 2 | 15 | if ($sub =~ /\A\?(?:[\?{\(PR]|[\+\-]?[0-9])/ms) { } |
40 | 14 | 1 | $sub =~ s/\A\?// ? : |
41 | 14 | 1 | if ($mod) |
60 | 1 | 9 | unless $str =~ /$re_optimize/ |
62 | 1 | 8 | if ($mod =~ /x/) |