t/re/pat.t: Add test for [perl #133933]

This was fixed by bf848a12528ab1e63a2f20da532eda498adbdca6.

1 files changed, 25 insertions, 1 deletions

diff --git a/t/re/pat.t b/t/re/pat.t
index c2b9d447a0..79ed9149d3 100644
--- a/t/re/pat.t
+++ b/t/re/pat.t
@@ -24,7 +24,7 @@ BEGIN {
 skip_all('no re module') unless defined &DynaLoader::boot_DynaLoader;
 skip_all_without_unicode_tables();
 
-plan tests => 859;  # Update this when adding/deleting tests.
+plan tests => 860;  # Update this when adding/deleting tests.
 
 run_tests() unless caller;
 
@@ -2055,6 +2055,30 @@ x{0c!}\;\;çÿ 
 
 
 x{1c!}\;\;îçÿp 
+
+    fresh_perl_is('s|ß+W0ü0f0\Qx0\Qx0x0c0g0c 000n0000000000000O0h000x0 \xòÿÿÿ
+
+
+
+
+
+	ç
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+x{0c!}\;\;îçÿ 
     }
 
 } # End of sub run_tests