Re: [ID 20010506.041] segfault when matching utf8 string

Message-Id: <200105250113.CAA23158@crypt.compulink.co.uk>

p4raw-id: //depot/perl@10207

diff --git a/t/op/misc.t b/t/op/misc.t
index c791f15..e3927a3 100755 (executable)
--- a/t/op/misc.t
+++ b/t/op/misc.t
@@ -677,3 +677,8 @@ sub bad {
 }
 EXPECT
 OK
+########
+# Bug 20010506.041
+"abcd\x{1234}" =~ /(a)(b[c])(d+)?/i and print "ok\n";
+EXPECT
+ok