This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
migrate CURLYX/WHILEM branch in regmatch() to new FSM-esque paradigm
[perl5.git] / t / op / pat.t
index c1d8e2d..e20a6f7 100755 (executable)
@@ -3672,6 +3672,9 @@ SKIP:{
                    ( (?:b|z+){3,}? )
                    (
                        (?:
+                           (?:
+                               (?:c|z+){1,1}?z
+                           )?
                            (?:c|z+){1,1}
                        )*
                    )