summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-03-21 14:58:21 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-03-21 14:58:21 +0000
commitc689e61c7cf072958f1f0f7838c3e6c7dc5e21d5 (patch)
treebaea44739e3ce883d4d7752b8fa3665e70fea588 /t
parentbf076876beb37faf404cb529462c0d3621da4786 (diff)
downloadperl-c689e61c7cf072958f1f0f7838c3e6c7dc5e21d5.tar.gz
Resubmit change #24053.
p4raw-link: @24053 on //depot/perl: db70e37e387af55c0d76b7ec65cedd21b2364520 p4raw-id: //depot/perl@24055
Diffstat (limited to 't')
-rw-r--r--t/op/re_tests2
1 files changed, 2 insertions, 0 deletions
diff --git a/t/op/re_tests b/t/op/re_tests
index b7fbf2d2be..28deb0f7b4 100644
--- a/t/op/re_tests
+++ b/t/op/re_tests
@@ -956,3 +956,5 @@ x(?# x c - Sequence (?#... not terminated
(a|aa|aaa|aaaa|aaaaa|aaaaaa)(b|c) aaaaaaaaaaaaaaab y $1$2 aaaaaab
(a|aa|aaa|aaaa|aaaaa|aaaaaa)(??{$1&&""})(b|c) aaaaaaaaaaaaaaab y $1$2 aaaaaab
(a|aa|aaa|aaaa|aaaaa|aaaaaa)(??{$1&&"foo"})(b|c) aaaaaaaaaaaaaaab n - -
+^(a*?)(?!(aa|aaaa)*$) aaaaaaaaaaaaaaaaaaaa y $1 a # [perl #34195]
+^(a*?)(?!(aa|aaaa)*$)(?=a\z) aaaaaaaa y $1 aaaaaaa