xref: /openbsd-src/gnu/usr.bin/perl/t/re/re_tests (revision 898184e3e61f9129feb5978fad5a8c6865f00b92)
1# This stops me getting screenfulls of syntax errors every time I accidentally
2# run this file via a shell glob.  The full format of this file is given
3# in regexp.t
4# Prior to the implementation of autoloading of \N{}, tests that used \N{name}
5# could not go in this file, and were farmed out to other .t's.
6#
7# pat	string	y/n/etc	expr	expected-expr	skip-reason
8__END__
9abc	abc	y	$&	abc
10abc	abc	y	$-[0]	0
11abc	abc	y	$+[0]	3
12abc	xbc	n	-	-
13abc	axc	n	-	-
14abc	abx	n	-	-
15abc	xabcy	y	$&	abc
16abc	xabcy	y	$-[0]	1
17abc	xabcy	y	$+[0]	4
18abc	ababc	y	$&	abc
19abc	ababc	y	$-[0]	2
20abc	ababc	y	$+[0]	5
21ab*c	abc	y	$&	abc
22ab*c	abc	y	$-[0]	0
23ab*c	abc	y	$+[0]	3
24ab*bc	abc	y	$&	abc
25ab*bc	abc	y	$-[0]	0
26ab*bc	abc	y	$+[0]	3
27ab*bc	abbc	y	$&	abbc
28ab*bc	abbc	y	$-[0]	0
29ab*bc	abbc	y	$+[0]	4
30ab*bc	abbbbc	y	$&	abbbbc
31ab*bc	abbbbc	y	$-[0]	0
32ab*bc	abbbbc	y	$+[0]	6
33.{1}	abbbbc	y	$&	a
34.{1}	abbbbc	y	$-[0]	0
35.{1}	abbbbc	y	$+[0]	1
36.{3,4}	abbbbc	y	$&	abbb
37.{3,4}	abbbbc	y	$-[0]	0
38.{3,4}	abbbbc	y	$+[0]	4
39\N{1}	abbbbc	y	$&	a
40\N{1}	abbbbc	y	$-[0]	0
41\N{1}	abbbbc	y	$+[0]	1
42/\N {1}/x	abbbbc	y	$&	a
43/\N {1}/x	abbbbc	y	$-[0]	0
44/\N {1}/x	abbbbc	y	$+[0]	1
45\N{3,4}	abbbbc	y	$&	abbb
46\N{3,4}	abbbbc	y	$-[0]	0
47\N{3,4}	abbbbc	y	$+[0]	4
48/\N {3,4}/x	abbbbc	y	$&	abbb
49/\N {3,4}/x	abbbbc	y	$-[0]	0
50/\N {3,4}/x	abbbbc	y	$+[0]	4
51ab{0,}bc	abbbbc	y	$&	abbbbc
52ab{0,}bc	abbbbc	y	$-[0]	0
53ab{0,}bc	abbbbc	y	$+[0]	6
54ab+bc	abbc	y	$&	abbc
55ab+bc	abbc	y	$-[0]	0
56ab+bc	abbc	y	$+[0]	4
57ab+bc	abc	n	-	-
58ab+bc	abq	n	-	-
59ab{1,}bc	abq	n	-	-
60ab+bc	abbbbc	y	$&	abbbbc
61ab+bc	abbbbc	y	$-[0]	0
62ab+bc	abbbbc	y	$+[0]	6
63ab{1,}bc	abbbbc	y	$&	abbbbc
64ab{1,}bc	abbbbc	y	$-[0]	0
65ab{1,}bc	abbbbc	y	$+[0]	6
66ab{1,3}bc	abbbbc	y	$&	abbbbc
67ab{1,3}bc	abbbbc	y	$-[0]	0
68ab{1,3}bc	abbbbc	y	$+[0]	6
69ab{3,4}bc	abbbbc	y	$&	abbbbc
70ab{3,4}bc	abbbbc	y	$-[0]	0
71ab{3,4}bc	abbbbc	y	$+[0]	6
72ab{4,5}bc	abbbbc	n	-	-
73ab?bc	abbc	y	$&	abbc
74ab?bc	abc	y	$&	abc
75ab{0,1}bc	abc	y	$&	abc
76ab?bc	abbbbc	n	-	-
77ab?c	abc	y	$&	abc
78ab{0,1}c	abc	y	$&	abc
79^abc$	abc	y	$&	abc
80^abc$	abcc	n	-	-
81^abc	abcc	y	$&	abc
82^abc$	aabc	n	-	-
83abc$	aabc	y	$&	abc
84abc$	aabcd	n	-	-
85^	abc	y	$&
86$	abc	y	$&
87a.c	abc	y	$&	abc
88a.c	axc	y	$&	axc
89a\Nc	abc	y	$&	abc
90/a\N c/x	abc	y	$&	abc
91a.*c	axyzc	y	$&	axyzc
92a\N*c	axyzc	y	$&	axyzc
93/a\N *c/x	axyzc	y	$&	axyzc
94a.*c	axyzd	n	-	-
95a\N*c	axyzd	n	-	-
96/a\N *c/x	axyzd	n	-	-
97a[bc]d	abc	n	-	-
98a[bc]d	abd	y	$&	abd
99a[b]d	abd	y	$&	abd
100[a][b][d]	abd	y	$&	abd
101.[b].	abd	y	$&	abd
102.[b].	aBd	n	-	-
103(?i:.[b].)	abd	y	$&	abd
104(?i:\N[b]\N)	abd	y	$&	abd
105a[b-d]e	abd	n	-	-
106a[b-d]e	ace	y	$&	ace
107a[b-d]	aac	y	$&	ac
108a[-b]	a-	y	$&	a-
109a[b-]	a-	y	$&	a-
110a[b-a]	-	c	-	Invalid [] range \"b-a\"
111a[]b	-	c	-	Unmatched [
112a[	-	c	-	Unmatched [
113a]	a]	y	$&	a]
114a[]]b	a]b	y	$&	a]b
115a[^bc]d	aed	y	$&	aed
116a[^bc]d	abd	n	-	-
117a[^-b]c	adc	y	$&	adc
118a[^-b]c	a-c	n	-	-
119a[^]b]c	a]c	n	-	-
120a[^]b]c	adc	y	$&	adc
121\ba\b	a-	y	-	-
122\ba\b	-a	y	-	-
123\ba\b	-a-	y	-	-
124\by\b	xy	n	-	-
125\by\b	yz	n	-	-
126\by\b	xyz	n	-	-
127\Ba\B	a-	n	-	-
128\Ba\B	-a	n	-	-
129\Ba\B	-a-	n	-	-
130\By\b	xy	y	-	-
131\By\b	xy	y	$-[0]	1
132\By\b	xy	y	$+[0]	2
133\By\b	xy	y	-	-
134\by\B	yz	y	-	-
135\By\B	xyz	y	-	-
136\w	a	y	-	-
137\w	-	n	-	-
138\W	a	n	-	-
139\W	-	y	-	-
140a\sb	a b	y	-	-
141a\sb	a-b	n	-	-
142a\Sb	a b	n	-	-
143a\Sb	a-b	y	-	-
144\d	1	y	-	-
145\d	-	n	-	-
146\D	1	n	-	-
147\D	-	y	-	-
148[\w]	a	y	-	-
149[\w]	-	n	-	-
150[\W]	a	n	-	-
151[\W]	-	y	-	-
152a[\s]b	a b	y	-	-
153a[\s]b	a-b	n	-	-
154a[\S]b	a b	n	-	-
155a[\S]b	a-b	y	-	-
156[\d]	1	y	-	-
157[\d]	-	n	-	-
158[\D]	1	n	-	-
159[\D]	-	y	-	-
160ab|cd	abc	y	$&	ab
161ab|cd	abcd	y	$&	ab
162()ef	def	y	$&-$1	ef-
163()ef	def	y	$-[0]	1
164()ef	def	y	$+[0]	3
165()ef	def	y	$-[1]	1
166()ef	def	y	$+[1]	1
167*a	-	c	-	Quantifier follows nothing
168(|*)b	-	c	-	Quantifier follows nothing
169(*)b	-	c	-	Unknown verb
170$b	b	n	-	-
171a\	-	c	-	Search pattern not terminated
172a\(b	a(b	y	$&-$1	a(b-
173a\(*b	ab	y	$&	ab
174a\(*b	a((b	y	$&	a((b
175a\\b	a\\b	y	$&	a\\b
176abc)	-	c	-	Unmatched )
177(abc	-	c	-	Unmatched (
178((a))	abc	y	$&-$1-$2	a-a-a
179((a))	abc	y	$-[0]-$-[1]-$-[2]	0-0-0
180((a))	abc	y	$+[0]-$+[1]-$+[2]	1-1-1
181((a))	abc	b	@-	0 0 0
182((a))	abc	b	@+	1 1 1
183(a)b(c)	abc	y	$&-$1-$2	abc-a-c
184(a)b(c)	abc	y	$-[0]-$-[1]-$-[2]	0-0-2
185(a)b(c)	abc	y	$+[0]-$+[1]-$+[2]	3-1-3
186a+b+c	aabbabc	y	$&	abc
187a{1,}b{1,}c	aabbabc	y	$&	abc
188a**	-	c	-	Nested quantifiers
189a.+?c	abcabc	y	$&	abc
190(a+|b)*	ab	y	$&-$1	ab-b
191(a+|b)*	ab	y	$-[0]	0
192(a+|b)*	ab	y	$+[0]	2
193(a+|b)*	ab	y	$-[1]	1
194(a+|b)*	ab	y	$+[1]	2
195(a+|b){0,}	ab	y	$&-$1	ab-b
196(a+|b)+	ab	y	$&-$1	ab-b
197(a+|b){1,}	ab	y	$&-$1	ab-b
198(a+|b)?	ab	y	$&-$1	a-a
199(a+|b){0,1}	ab	y	$&-$1	a-a
200)(	-	c	-	Unmatched )
201[^ab]*	cde	y	$&	cde
202abc		n	-	-
203a*		y	$&
204([abc])*d	abbbcd	y	$&-$1	abbbcd-c
205([abc])*bcd	abcd	y	$&-$1	abcd-a
206a|b|c|d|e	e	y	$&	e
207(a|b|c|d|e)f	ef	y	$&-$1	ef-e
208(a|b|c|d|e)f	ef	y	$-[0]	0
209(a|b|c|d|e)f	ef	y	$+[0]	2
210(a|b|c|d|e)f	ef	y	$-[1]	0
211(a|b|c|d|e)f	ef	y	$+[1]	1
212abcd*efg	abcdefg	y	$&	abcdefg
213ab*	xabyabbbz	y	$&	ab
214ab*	xayabbbz	y	$&	a
215(ab|cd)e	abcde	y	$&-$1	cde-cd
216[abhgefdc]ij	hij	y	$&	hij
217^(ab|cd)e	abcde	n	x$1y	xy
218(abc|)ef	abcdef	y	$&-$1	ef-
219(a|b)c*d	abcd	y	$&-$1	bcd-b
220(ab|ab*)bc	abc	y	$&-$1	abc-a
221a([bc]*)c*	abc	y	$&-$1	abc-bc
222a([bc]*)(c*d)	abcd	y	$&-$1-$2	abcd-bc-d
223a([bc]*)(c*d)	abcd	y	$-[0]	0
224a([bc]*)(c*d)	abcd	y	$+[0]	4
225a([bc]*)(c*d)	abcd	y	$-[1]	1
226a([bc]*)(c*d)	abcd	y	$+[1]	3
227a([bc]*)(c*d)	abcd	y	$-[2]	3
228a([bc]*)(c*d)	abcd	y	$+[2]	4
229a([bc]+)(c*d)	abcd	y	$&-$1-$2	abcd-bc-d
230a([bc]*)(c+d)	abcd	y	$&-$1-$2	abcd-b-cd
231a([bc]*)(c+d)	abcd	y	$-[0]	0
232a([bc]*)(c+d)	abcd	y	$+[0]	4
233a([bc]*)(c+d)	abcd	y	$-[1]	1
234a([bc]*)(c+d)	abcd	y	$+[1]	2
235a([bc]*)(c+d)	abcd	y	$-[2]	2
236a([bc]*)(c+d)	abcd	y	$+[2]	4
237a[bcd]*dcdcde	adcdcde	y	$&	adcdcde
238a[bcd]+dcdcde	adcdcde	n	-	-
239(ab|a)b*c	abc	y	$&-$1	abc-ab
240(ab|a)b*c	abc	y	$-[0]	0
241(ab|a)b*c	abc	y	$+[0]	3
242(ab|a)b*c	abc	y	$-[1]	0
243(ab|a)b*c	abc	y	$+[1]	2
244((a)(b)c)(d)	abcd	y	$1-$2-$3-$4	abc-a-b-d
245((a)(b)c)(d)	abcd	y	$-[0]	0
246((a)(b)c)(d)	abcd	y	$+[0]	4
247((a)(b)c)(d)	abcd	y	$-[1]	0
248((a)(b)c)(d)	abcd	y	$+[1]	3
249((a)(b)c)(d)	abcd	y	$-[2]	0
250((a)(b)c)(d)	abcd	y	$+[2]	1
251((a)(b)c)(d)	abcd	y	$-[3]	1
252((a)(b)c)(d)	abcd	y	$+[3]	2
253((a)(b)c)(d)	abcd	y	$-[4]	3
254((a)(b)c)(d)	abcd	y	$+[4]	4
255[a-zA-Z_][a-zA-Z0-9_]*	alpha	y	$&	alpha
256^a(bc+|b[eh])g|.h$	abh	y	$&-$1	bh-
257(bc+d$|ef*g.|h?i(j|k))	effgz	y	$&-$1-$2	effgz-effgz-
258(bc+d$|ef*g.|h?i(j|k))	ij	y	$&-$1-$2	ij-ij-j
259(bc+d$|ef*g.|h?i(j|k))	effg	n	-	-
260(bc+d$|ef*g.|h?i(j|k))	bcdd	n	-	-
261(bc+d$|ef*g.|h?i(j|k))	reffgz	y	$&-$1-$2	effgz-effgz-
262((((((((((a))))))))))	a	y	$10	a
263((((((((((a))))))))))	a	y	$-[0]	0
264((((((((((a))))))))))	a	y	$+[0]	1
265((((((((((a))))))))))	a	y	$-[10]	0
266((((((((((a))))))))))	a	y	$+[10]	1
267((((((((((a))))))))))\10	aa	y	$&	aa
268((((((((((a))))))))))${bang}	aa	n	-	-
269((((((((((a))))))))))${bang}	a!	y	$&	a!
270(((((((((a)))))))))	a	y	$&	a
271multiple words of text	uh-uh	n	-	-
272multiple words	multiple words, yeah	y	$&	multiple words
273(.*)c(.*)	abcde	y	$&-$1-$2	abcde-ab-de
274\((.*), (.*)\)	(a, b)	y	($2, $1)	(b, a)
275[k]	ab	n	-	-
276abcd	abcd	y	$&-\$&-\\$&	abcd-\$&-\\abcd
277a(bc)d	abcd	y	$1-\$1-\\$1	bc-\$1-\\bc
278a[-]?c	ac	y	$&	ac
279(abc)\1	abcabc	y	$1	abc
280([a-c]*)\1	abcabc	y	$1	abc
281\1	-	c	-	Reference to nonexistent group
282\2	-	c	-	Reference to nonexistent group
283\g1	-	c	-	Reference to nonexistent group
284\g-1	-	c	-	Reference to nonexistent or unclosed group
285\g{1}	-	c	-	Reference to nonexistent group
286\g{-1}	-	c	-	Reference to nonexistent or unclosed group
287\g0	-	c	-	Reference to invalid group 0
288\g-0	-	c	-	Reference to invalid group 0
289\g{0}	-	c	-	Reference to invalid group 0
290\g{-0}	-	c	-	Reference to invalid group 0
291(a)|\1	a	y	-	-
292(a)|\1	x	n	-	Reference to group in different branch
293(?:(b)?a)\1	a	n	-	Reference to group that did not match
294(a)|\2	-	c	-	Reference to nonexistent group
295(([a-c])b*?\2)*	ababbbcbc	y	$&-$1-$2	ababb-bb-b
296(([a-c])b*?\2){3}	ababbbcbc	y	$&-$1-$2	ababbbcbc-cbc-c
297((\3|b)\2(a)x)+	aaxabxbaxbbx	n	-	-
298((\3|b)\2(a)x)+	aaaxabaxbaaxbbax	y	$&-$1-$2-$3	bbax-bbax-b-a
299((\3|b)\2(a)){2,}	bbaababbabaaaaabbaaaabba	y	$&-$1-$2-$3	bbaaaabba-bba-b-a
300#Bug #3589 - up to perl-5.6.0 matches incorrectly, from 5.6.1 not anymore
301^((.)?a\2)+$	babadad	n	-	-
302(a)|(b)	b	y	$-[0]	0
303(a)|(b)	b	y	$+[0]	1
304(a)|(b)	b	y	x$-[1]	x
305(a)|(b)	b	y	x$+[1]	x
306(a)|(b)	b	y	$-[2]	0
307(a)|(b)	b	y	$+[2]	1
308'abc'i	ABC	y	$&	ABC
309'abc'i	XBC	n	-	-
310'abc'i	AXC	n	-	-
311'abc'i	ABX	n	-	-
312'abc'i	XABCY	y	$&	ABC
313'abc'i	ABABC	y	$&	ABC
314'ab*c'i	ABC	y	$&	ABC
315'ab*bc'i	ABC	y	$&	ABC
316'ab*bc'i	ABBC	y	$&	ABBC
317'ab*?bc'i	ABBBBC	y	$&	ABBBBC
318'ab{0,}?bc'i	ABBBBC	y	$&	ABBBBC
319'ab+?bc'i	ABBC	y	$&	ABBC
320'ab+bc'i	ABC	n	-	-
321'ab+bc'i	ABQ	n	-	-
322'ab{1,}bc'i	ABQ	n	-	-
323'ab+bc'i	ABBBBC	y	$&	ABBBBC
324'ab{1,}?bc'i	ABBBBC	y	$&	ABBBBC
325'ab{1,3}?bc'i	ABBBBC	y	$&	ABBBBC
326'ab{3,4}?bc'i	ABBBBC	y	$&	ABBBBC
327'ab{4,5}?bc'i	ABBBBC	n	-	-
328'ab??bc'i	ABBC	y	$&	ABBC
329'ab??bc'i	ABC	y	$&	ABC
330'ab{0,1}?bc'i	ABC	y	$&	ABC
331'ab??bc'i	ABBBBC	n	-	-
332'ab??c'i	ABC	y	$&	ABC
333'ab{0,1}?c'i	ABC	y	$&	ABC
334'^abc$'i	ABC	y	$&	ABC
335'^abc$'i	ABCC	n	-	-
336'^abc'i	ABCC	y	$&	ABC
337'^abc$'i	AABC	n	-	-
338'abc$'i	AABC	y	$&	ABC
339'^'i	ABC	y	$&
340'$'i	ABC	y	$&
341'a.c'i	ABC	y	$&	ABC
342'a.c'i	AXC	y	$&	AXC
343'a\Nc'i	ABC	y	$&	ABC
344'a.*?c'i	AXYZC	y	$&	AXYZC
345'a.*c'i	AXYZD	n	-	-
346'a[bc]d'i	ABC	n	-	-
347'a[bc]d'i	ABD	y	$&	ABD
348'a[b-d]e'i	ABD	n	-	-
349'a[b-d]e'i	ACE	y	$&	ACE
350'a[b-d]'i	AAC	y	$&	AC
351'a[-b]'i	A-	y	$&	A-
352'a[b-]'i	A-	y	$&	A-
353'a[b-a]'i	-	c	-	Invalid [] range \"b-a\"
354'a[]b'i	-	c	-	Unmatched [
355'a['i	-	c	-	Unmatched [
356'a]'i	A]	y	$&	A]
357'a[]]b'i	A]B	y	$&	A]B
358'a[^bc]d'i	AED	y	$&	AED
359'a[^bc]d'i	ABD	n	-	-
360'a[^-b]c'i	ADC	y	$&	ADC
361'a[^-b]c'i	A-C	n	-	-
362'a[^]b]c'i	A]C	n	-	-
363'a[^]b]c'i	ADC	y	$&	ADC
364'ab|cd'i	ABC	y	$&	AB
365'ab|cd'i	ABCD	y	$&	AB
366'()ef'i	DEF	y	$&-$1	EF-
367'*a'i	-	c	-	Quantifier follows nothing
368'(|*)b'i	-	c	-	Quantifier follows nothing
369'(*)b'i	-	c	-	Unknown verb
370'$b'i	B	n	-	-
371'a\'i	-	c	-	Search pattern not terminated
372'a\(b'i	A(B	y	$&-$1	A(B-
373'a\(*b'i	AB	y	$&	AB
374'a\(*b'i	A((B	y	$&	A((B
375'a\\b'i	A\\B	y	$&	A\\B
376'abc)'i	-	c	-	Unmatched )
377'(abc'i	-	c	-	Unmatched (
378'((a))'i	ABC	y	$&-$1-$2	A-A-A
379'(a)b(c)'i	ABC	y	$&-$1-$2	ABC-A-C
380'a+b+c'i	AABBABC	y	$&	ABC
381'a{1,}b{1,}c'i	AABBABC	y	$&	ABC
382'a**'i	-	c	-	Nested quantifiers
383'a.+?c'i	ABCABC	y	$&	ABC
384'a.*?c'i	ABCABC	y	$&	ABC
385'a.{0,5}?c'i	ABCABC	y	$&	ABC
386'(a+|b)*'i	AB	y	$&-$1	AB-B
387'(a+|b){0,}'i	AB	y	$&-$1	AB-B
388'(a+|b)+'i	AB	y	$&-$1	AB-B
389'(a+|b){1,}'i	AB	y	$&-$1	AB-B
390'(a+|b)?'i	AB	y	$&-$1	A-A
391'(a+|b){0,1}'i	AB	y	$&-$1	A-A
392'(a+|b){0,1}?'i	AB	y	$&-$1	-
393')('i	-	c	-	Unmatched )
394'[^ab]*'i	CDE	y	$&	CDE
395'abc'i		n	-	-
396'a*'i		y	$&
397'([abc])*d'i	ABBBCD	y	$&-$1	ABBBCD-C
398'([abc])*bcd'i	ABCD	y	$&-$1	ABCD-A
399'a|b|c|d|e'i	E	y	$&	E
400'(a|b|c|d|e)f'i	EF	y	$&-$1	EF-E
401'abcd*efg'i	ABCDEFG	y	$&	ABCDEFG
402'ab*'i	XABYABBBZ	y	$&	AB
403'ab*'i	XAYABBBZ	y	$&	A
404'(ab|cd)e'i	ABCDE	y	$&-$1	CDE-CD
405'[abhgefdc]ij'i	HIJ	y	$&	HIJ
406'^(ab|cd)e'i	ABCDE	n	x$1y	XY
407'(abc|)ef'i	ABCDEF	y	$&-$1	EF-
408'(a|b)c*d'i	ABCD	y	$&-$1	BCD-B
409'(ab|ab*)bc'i	ABC	y	$&-$1	ABC-A
410'a([bc]*)c*'i	ABC	y	$&-$1	ABC-BC
411'a([bc]*)(c*d)'i	ABCD	y	$&-$1-$2	ABCD-BC-D
412'a([bc]+)(c*d)'i	ABCD	y	$&-$1-$2	ABCD-BC-D
413'a([bc]*)(c+d)'i	ABCD	y	$&-$1-$2	ABCD-B-CD
414'a[bcd]*dcdcde'i	ADCDCDE	y	$&	ADCDCDE
415'a[bcd]+dcdcde'i	ADCDCDE	n	-	-
416'(ab|a)b*c'i	ABC	y	$&-$1	ABC-AB
417'((a)(b)c)(d)'i	ABCD	y	$1-$2-$3-$4	ABC-A-B-D
418'[a-zA-Z_][a-zA-Z0-9_]*'i	ALPHA	y	$&	ALPHA
419'^a(bc+|b[eh])g|.h$'i	ABH	y	$&-$1	BH-
420'(bc+d$|ef*g.|h?i(j|k))'i	EFFGZ	y	$&-$1-$2	EFFGZ-EFFGZ-
421'(bc+d$|ef*g.|h?i(j|k))'i	IJ	y	$&-$1-$2	IJ-IJ-J
422'(bc+d$|ef*g.|h?i(j|k))'i	EFFG	n	-	-
423'(bc+d$|ef*g.|h?i(j|k))'i	BCDD	n	-	-
424'(bc+d$|ef*g.|h?i(j|k))'i	REFFGZ	y	$&-$1-$2	EFFGZ-EFFGZ-
425'((((((((((a))))))))))'i	A	y	$10	A
426'((((((((((a))))))))))\10'i	AA	y	$&	AA
427'((((((((((a))))))))))${bang}'i	AA	n	-	-
428'((((((((((a))))))))))${bang}'i	A!	y	$&	A!
429'(((((((((a)))))))))'i	A	y	$&	A
430'(?:(?:(?:(?:(?:(?:(?:(?:(?:(a))))))))))'i	A	y	$1	A
431'(?:(?:(?:(?:(?:(?:(?:(?:(?:(a|b|c))))))))))'i	C	y	$1	C
432'multiple words of text'i	UH-UH	n	-	-
433'multiple words'i	MULTIPLE WORDS, YEAH	y	$&	MULTIPLE WORDS
434'(.*)c(.*)'i	ABCDE	y	$&-$1-$2	ABCDE-AB-DE
435'\((.*), (.*)\)'i	(A, B)	y	($2, $1)	(B, A)
436'[k]'i	AB	n	-	-
437'abcd'i	ABCD	y	$&-\$&-\\$&	ABCD-\$&-\\ABCD
438'a(bc)d'i	ABCD	y	$1-\$1-\\$1	BC-\$1-\\BC
439'a[-]?c'i	AC	y	$&	AC
440'(abc)\1'i	ABCABC	y	$1	ABC
441'([a-c]*)\1'i	ABCABC	y	$1	ABC
442a(?!b).	abad	y	$&	ad
443(?=)a	a	y	$&	a
444a(?=d).	abad	y	$&	ad
445a(?=c|d).	abad	y	$&	ad
446a(?:b|c|d)(.)	ace	y	$1	e
447a(?:b|c|d)*(.)	ace	y	$1	e
448a(?:b|c|d)+?(.)	ace	y	$1	e
449a(?:b|c|d)+?(.)	acdbcdbe	y	$1	d
450a(?:b|c|d)+(.)	acdbcdbe	y	$1	e
451a(?:b|c|d){2}(.)	acdbcdbe	y	$1	b
452a(?:b|c|d){4,5}(.)	acdbcdbe	y	$1	b
453a(?:b|c|d){4,5}?(.)	acdbcdbe	y	$1	d
454((foo)|(bar))*	foobar	y	$1-$2-$3	bar-foo-bar
455:(?:	-	c	-	Sequence (? incomplete
456a(?:b|c|d){6,7}(.)	acdbcdbe	y	$1	e
457a(?:b|c|d){6,7}?(.)	acdbcdbe	y	$1	e
458a(?:b|c|d){5,6}(.)	acdbcdbe	y	$1	e
459a(?:b|c|d){5,6}?(.)	acdbcdbe	y	$1	b
460a(?:b|c|d){5,7}(.)	acdbcdbe	y	$1	e
461a(?:b|c|d){5,7}?(.)	acdbcdbe	y	$1	b
462a(?:b|(c|e){1,2}?|d)+?(.)	ace	y	$1$2	ce
463^(.+)?B	AB	y	$1	A
464^([^a-z])|(\^)$	.	y	$1	.
465^[<>]&	<&OUT	y	$&	<&
466^(a\1?){4}$	aaaaaaaaaa	y	$1	aaaa
467^(a\1?){4}$	aaaaaaaaa	n	-	-
468^(a\1?){4}$	aaaaaaaaaaa	n	-	-
469^(a(?(1)\1)){4}$	aaaaaaaaaa	y	$1	aaaa
470^(a(?(1)\1)){4}$	aaaaaaaaa	n	-	-
471^(a(?(1)\1)){4}$	aaaaaaaaaaa	n	-	-
472((a{4})+)	aaaaaaaaa	y	$1	aaaaaaaa
473(((aa){2})+)	aaaaaaaaaa	y	$1	aaaaaaaa
474(((a{2}){2})+)	aaaaaaaaaa	y	$1	aaaaaaaa
475(?:(f)(o)(o)|(b)(a)(r))*	foobar	y	$1:$2:$3:$4:$5:$6	f:o:o:b:a:r
476(?<=a)b	ab	y	$&	b
477(?<=a)b	cb	n	-	-
478(?<=a)b	b	n	-	-
479(?<!c)b	ab	y	$&	b
480(?<!c)b	cb	n	-	-
481(?<!c)b	b	y	-	-
482(?<!c)b	b	y	$&	b
483(?<%)b	-	c	-	Sequence (?<%...) not recognized
484(?:..)*a	aba	y	$&	aba
485(?:..)*?a	aba	y	$&	a
486^(?:b|a(?=(.)))*\1	abc	y	$&	ab
487^(){3,5}	abc	y	a$1	a
488^(a+)*ax	aax	y	$1	a
489^((a|b)+)*ax	aax	y	$1	a
490^((a|bc)+)*ax	aax	y	$1	a
491(a|x)*ab	cab	y	y$1	y
492(a)*ab	cab	y	y$1	y
493(?:(?i)a)b	ab	y	$&	ab
494((?i)a)b	ab	y	$&:$1	ab:a
495(?:(?i)a)b	Ab	y	$&	Ab
496((?i)a)b	Ab	y	$&:$1	Ab:A
497(?:(?i)a)b	aB	n	-	-
498((?i)a)b	aB	n	-	-
499(?i:a)b	ab	y	$&	ab
500((?i:a))b	ab	y	$&:$1	ab:a
501(?i:a)b	Ab	y	$&	Ab
502((?i:a))b	Ab	y	$&:$1	Ab:A
503(?i:a)b	aB	n	-	-
504((?i:a))b	aB	n	-	-
505'(?:(?-i)a)b'i	ab	y	$&	ab
506'((?-i)a)b'i	ab	y	$&:$1	ab:a
507'(?:(?-i)a)b'i	aB	y	$&	aB
508'((?-i)a)b'i	aB	y	$&:$1	aB:a
509'(?:(?-i)a)b'i	Ab	n	-	-
510'((?-i)a)b'i	Ab	n	-	-
511'(?:(?-i)a)b'i	aB	y	$&	aB
512'((?-i)a)b'i	aB	y	$1	a
513'(?:(?-i)a)b'i	AB	n	-	-
514'((?-i)a)b'i	AB	n	-	-
515'(?-i:a)b'i	ab	y	$&	ab
516'((?-i:a))b'i	ab	y	$&:$1	ab:a
517'(?-i:a)b'i	aB	y	$&	aB
518'((?-i:a))b'i	aB	y	$&:$1	aB:a
519'(?-i:a)b'i	Ab	n	-	-
520'((?-i:a))b'i	Ab	n	-	-
521'(?-i:a)b'i	aB	y	$&	aB
522'((?-i:a))b'i	aB	y	$1	a
523'(?-i:a)b'i	AB	n	-	-
524'((?-i:a))b'i	AB	n	-	-
525'((?-i:a.))b'i	a\nB	n	-	-
526'((?-i:a\N))b'i	a\nB	n	-	-
527'((?s-i:a.))b'i	a\nB	y	$1	a\n
528'((?s-i:a\N))b'i	a\nB	n	-	-
529'((?s-i:a.))b'i	B\nB	n	-	-
530'((?s-i:a\N))b'i	B\nB	n	-	-
531(?:c|d)(?:)(?:a(?:)(?:b)(?:b(?:))(?:b(?:)(?:b)))	cabbbb	y	$&	cabbbb
532(?:c|d)(?:)(?:aaaaaaaa(?:)(?:bbbbbbbb)(?:bbbbbbbb(?:))(?:bbbbbbbb(?:)(?:bbbbbbbb)))	caaaaaaaabbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb	y	$&	caaaaaaaabbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb
533'(ab)\d\1'i	Ab4ab	y	$1	Ab
534'(ab)\d\1'i	ab4Ab	y	$1	ab
535foo\w*\d{4}baz	foobar1234baz	y	$&	foobar1234baz
536a(?{})b	cabd	y	$&	ab
537a(?{)b	-	c	-	Sequence (?{...}) not terminated or not {}-balanced
538a(?{{})b	-	c	-	Sequence (?{...}) not terminated or not {}-balanced
539a(?{}})b	-	c	-
540a(?{"{"})b	-	c	-	Sequence (?{...}) not terminated or not {}-balanced
541a(?{"\{"})b	cabd	y	$&	ab
542a(?{"{"}})b	-	c	-	Unmatched right curly bracket
543a(?{$::bl="\{"}).b	caxbd	y	$::bl	{
544x(~~)*(?:(?:F)?)?	x~~	y	-	-
545^a(?#xxx){3}c	aaac	y	$&	aaac
546'^a (?#xxx) (?#yyy) {3}c'x	aaac	y	$&	aaac
547(?<![cd])b	dbcb	n	-	-
548(?<![cd])[ab]	dbaacb	y	$&	a
549(?<!(c|d))b	dbcb	n	-	-
550(?<!(c|d))[ab]	dbaacb	y	$&	a
551(?<!cd)[ab]	cdaccb	y	$&	b
552^(?:a?b?)*$	a--	n	-	-
553((?s)^a(.))((?m)^b$)	a\nb\nc\n	y	$1;$2;$3	a\n;\n;b
554((?m)^b$)	a\nb\nc\n	y	$1	b
555(?m)^b	a\nb\n	y	$&	b
556(?m)^(b)	a\nb\n	y	$1	b
557((?m)^b)	a\nb\n	y	$1	b
558\n((?m)^b)	a\nb\n	y	$1	b
559((?s).)c(?!.)	a\nb\nc\n	y	$1	\n
560((?s).)c(?!.)	a\nb\nc\n	y	$1:$&	\n:\nc
561((?s)b.)c(?!.)	a\nb\nc\n	y	$1	b\n
562((?s)b.)c(?!.)	a\nb\nc\n	y	$1:$&	b\n:b\nc
563((?s)b.)c(?!\N)	a\nb\nc\n	y	$1:$&	b\n:b\nc
564'(b.)c(?!\N)'s	a\nb\nc\n	y	$1:$&	b\n:b\nc
565^b	a\nb\nc\n	n	-	-
566()^b	a\nb\nc\n	n	-	-
567((?m)^b)	a\nb\nc\n	y	$1	b
568(?(1)a|b)	a	n	-	-
569(?(1)b|a)	a	y	$&	a
570(x)?(?(1)a|b)	a	n	-	-
571(x)?(?(1)b|a)	a	y	$&	a
572()?(?(1)b|a)	a	y	$&	a
573()(?(1)b|a)	a	n	-	-
574()?(?(1)a|b)	a	y	$&	a
575^(\()?blah(?(1)(\)))$	(blah)	y	$2	)
576^(\()?blah(?(1)(\)))$	blah	y	($2)	()
577^(\()?blah(?(1)(\)))$	blah)	n	-	-
578^(\()?blah(?(1)(\)))$	(blah	n	-	-
579^(\(+)?blah(?(1)(\)))$	(blah)	y	$2	)
580^(\(+)?blah(?(1)(\)))$	blah	y	($2)	()
581^(\(+)?blah(?(1)(\)))$	blah)	n	-	-
582^(\(+)?blah(?(1)(\)))$	(blah	n	-	-
583(?(1?)a|b)	a	c	-	Switch condition not recognized
584(?(1)a|b|c)	a	c	-	Switch (?(condition)... contains too many branches
585(?(?{0})a|b)	a	n	-	-
586(?(?{0})b|a)	a	y	$&	a
587(?(?{1})b|a)	a	n	-	-
588(?(?{1})a|b)	a	y	$&	a
589(?(?!a)a|b)	a	n	-	-
590(?(?!a)b|a)	a	y	$&	a
591(?(?=a)b|a)	a	n	-	-
592(?(?=a)a|b)	a	y	$&	a
593(?=(a+?))(\1ab)	aaab	y	$2	aab
594^(?=(a+?))\1ab	aaab	n	-	-
595(\w+:)+	one:	y	$1	one:
596$(?<=^(a))	a	y	$1	a
597(?=(a+?))(\1ab)	aaab	y	$2	aab
598^(?=(a+?))\1ab	aaab	n	-	-
599([\w:]+::)?(\w+)$	abcd:	n	-	-
600([\w:]+::)?(\w+)$	abcd	y	$1-$2	-abcd
601([\w:]+::)?(\w+)$	xy:z:::abcd	y	$1-$2	xy:z:::-abcd
602^[^bcd]*(c+)	aexycd	y	$1	c
603(a*)b+	caab	y	$1	aa
604([\w:]+::)?(\w+)$	abcd:	n	-	-
605([\w:]+::)?(\w+)$	abcd	y	$1-$2	-abcd
606([\w:]+::)?(\w+)$	xy:z:::abcd	y	$1-$2	xy:z:::-abcd
607^[^bcd]*(c+)	aexycd	y	$1	c
608(?{$a=2})a*aa(?{local$a=$a+1})k*c(?{$b=$a})	yaaxxaaaacd	y	$b	3
609(?{$a=2})(a(?{local$a=$a+1}))*aak*c(?{$b=$a})	yaaxxaaaacd	y	$b	4
610(>a+)ab	aaab	n	-	-
611(?>a+)b	aaab	y	-	-
612([[:]+)	a:[b]:	y	$1	:[
613([[=]+)	a=[b]=	y	$1	=[
614([[.]+)	a.[b].	y	$1	.[
615[a[:xyz:	-	c	-	Unmatched [
616[a[:xyz:]	-	c	-	POSIX class [:xyz:] unknown
617[a[:]b[:c]	abc	y	$&	abc
618([a[:xyz:]b]+)	pbaq	c	-	POSIX class [:xyz:] unknown
619[a[:]b[:c]	abc	y	$&	abc
620([[:alpha:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd
621([[:alnum:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy
622([[:ascii:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy__--  ${nulnul}
623([[:cntrl:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	${nulnul}
624([[:digit:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	01
625([[:graph:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy__--
626([[:lower:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	cd
627([[:print:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy__--
628([[:punct:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	__--
629([[:space:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1
630([[:word:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy__
631([[:upper:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	AB
632([[:xdigit:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01
633([[:^alpha:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	01
634((?a)[[:^alnum:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	__--  ${nulnul}${ffff}
635([[:^ascii:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	${ffff}
636([[:^cntrl:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy__--
637([[:^digit:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd
638([[:^lower:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	AB
639((?a)[[:^print:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	${nulnul}${ffff}
640([[:^punct:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy
641([[:^space:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	ABcd01Xy__--
642((?a)[[:^word:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	--  ${nulnul}${ffff}
643([[:^upper:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	cd01
644([[:^xdigit:]]+)	ABcd01Xy__--  ${nulnul}${ffff}	y	$1	Xy__--  ${nulnul}${ffff}
645[[:foo:]]	-	c	-	POSIX class [:foo:] unknown
646[[:^foo:]]	-	c	-	POSIX class [:^foo:] unknown
647((?>a+)b)	aaab	y	$1	aaab
648(?>(a+))b	aaab	y	$1	aaa
649((?>[^()]+)|\([^()]*\))+	((abc(ade)ufh()()x	y	$&	abc(ade)ufh()()x
650(?<=x+)y	-	c	-	Variable length lookbehind not implemented
651a{37,17}	-	c	-	Can't do {n,m} with n > m
652a{37,0}	-	c	-	Can't do {n,m} with n > m
653\Z	a\nb\n	y	$-[0]	3
654\z	a\nb\n	y	$-[0]	4
655$	a\nb\n	y	$-[0]	3
656\Z	b\na\n	y	$-[0]	3
657\z	b\na\n	y	$-[0]	4
658$	b\na\n	y	$-[0]	3
659\Z	b\na	y	$-[0]	3
660\z	b\na	y	$-[0]	3
661$	b\na	y	$-[0]	3
662'\Z'm	a\nb\n	y	$-[0]	3
663'\z'm	a\nb\n	y	$-[0]	4
664'$'m	a\nb\n	y	$-[0]	1
665'\Z'm	b\na\n	y	$-[0]	3
666'\z'm	b\na\n	y	$-[0]	4
667'$'m	b\na\n	y	$-[0]	1
668'\Z'm	b\na	y	$-[0]	3
669'\z'm	b\na	y	$-[0]	3
670'$'m	b\na	y	$-[0]	1
671a\Z	a\nb\n	n	-	-
672a\z	a\nb\n	n	-	-
673a$	a\nb\n	n	-	-
674a\Z	b\na\n	y	$-[0]	2
675a\z	b\na\n	n	-	-
676a$	b\na\n	y	$-[0]	2
677a\Z	b\na	y	$-[0]	2
678a\z	b\na	y	$-[0]	2
679a$	b\na	y	$-[0]	2
680'a\Z'm	a\nb\n	n	-	-
681'a\z'm	a\nb\n	n	-	-
682'a$'m	a\nb\n	y	$-[0]	0
683'a\Z'm	b\na\n	y	$-[0]	2
684'a\z'm	b\na\n	n	-	-
685'a$'m	b\na\n	y	$-[0]	2
686'a\Z'm	b\na	y	$-[0]	2
687'a\z'm	b\na	y	$-[0]	2
688'a$'m	b\na	y	$-[0]	2
689aa\Z	aa\nb\n	n	-	-
690aa\z	aa\nb\n	n	-	-
691aa$	aa\nb\n	n	-	-
692aa\Z	b\naa\n	y	$-[0]	2
693aa\z	b\naa\n	n	-	-
694aa$	b\naa\n	y	$-[0]	2
695aa\Z	b\naa	y	$-[0]	2
696aa\z	b\naa	y	$-[0]	2
697aa$	b\naa	y	$-[0]	2
698'aa\Z'm	aa\nb\n	n	-	-
699'aa\z'm	aa\nb\n	n	-	-
700'aa$'m	aa\nb\n	y	$-[0]	0
701'aa\Z'm	b\naa\n	y	$-[0]	2
702'aa\z'm	b\naa\n	n	-	-
703'aa$'m	b\naa\n	y	$-[0]	2
704'aa\Z'm	b\naa	y	$-[0]	2
705'aa\z'm	b\naa	y	$-[0]	2
706'aa$'m	b\naa	y	$-[0]	2
707aa\Z	ac\nb\n	n	-	-
708aa\z	ac\nb\n	n	-	-
709aa$	ac\nb\n	n	-	-
710aa\Z	b\nac\n	n	-	-
711aa\z	b\nac\n	n	-	-
712aa$	b\nac\n	n	-	-
713aa\Z	b\nac	n	-	-
714aa\z	b\nac	n	-	-
715aa$	b\nac	n	-	-
716'aa\Z'm	ac\nb\n	n	-	-
717'aa\z'm	ac\nb\n	n	-	-
718'aa$'m	ac\nb\n	n	-	-
719'aa\Z'm	b\nac\n	n	-	-
720'aa\z'm	b\nac\n	n	-	-
721'aa$'m	b\nac\n	n	-	-
722'aa\Z'm	b\nac	n	-	-
723'aa\z'm	b\nac	n	-	-
724'aa$'m	b\nac	n	-	-
725aa\Z	ca\nb\n	n	-	-
726aa\z	ca\nb\n	n	-	-
727aa$	ca\nb\n	n	-	-
728aa\Z	b\nca\n	n	-	-
729aa\z	b\nca\n	n	-	-
730aa$	b\nca\n	n	-	-
731aa\Z	b\nca	n	-	-
732aa\z	b\nca	n	-	-
733aa$	b\nca	n	-	-
734'aa\Z'm	ca\nb\n	n	-	-
735'aa\z'm	ca\nb\n	n	-	-
736'aa$'m	ca\nb\n	n	-	-
737'aa\Z'm	b\nca\n	n	-	-
738'aa\z'm	b\nca\n	n	-	-
739'aa$'m	b\nca\n	n	-	-
740'aa\Z'm	b\nca	n	-	-
741'aa\z'm	b\nca	n	-	-
742'aa$'m	b\nca	n	-	-
743ab\Z	ab\nb\n	n	-	-
744ab\z	ab\nb\n	n	-	-
745ab$	ab\nb\n	n	-	-
746ab\Z	b\nab\n	y	$-[0]	2
747ab\z	b\nab\n	n	-	-
748ab$	b\nab\n	y	$-[0]	2
749ab\Z	b\nab	y	$-[0]	2
750ab\z	b\nab	y	$-[0]	2
751ab$	b\nab	y	$-[0]	2
752'ab\Z'm	ab\nb\n	n	-	-
753'ab\z'm	ab\nb\n	n	-	-
754'ab$'m	ab\nb\n	y	$-[0]	0
755'ab\Z'm	b\nab\n	y	$-[0]	2
756'ab\z'm	b\nab\n	n	-	-
757'ab$'m	b\nab\n	y	$-[0]	2
758'ab\Z'm	b\nab	y	$-[0]	2
759'ab\z'm	b\nab	y	$-[0]	2
760'ab$'m	b\nab	y	$-[0]	2
761ab\Z	ac\nb\n	n	-	-
762ab\z	ac\nb\n	n	-	-
763ab$	ac\nb\n	n	-	-
764ab\Z	b\nac\n	n	-	-
765ab\z	b\nac\n	n	-	-
766ab$	b\nac\n	n	-	-
767ab\Z	b\nac	n	-	-
768ab\z	b\nac	n	-	-
769ab$	b\nac	n	-	-
770'ab\Z'm	ac\nb\n	n	-	-
771'ab\z'm	ac\nb\n	n	-	-
772'ab$'m	ac\nb\n	n	-	-
773'ab\Z'm	b\nac\n	n	-	-
774'ab\z'm	b\nac\n	n	-	-
775'ab$'m	b\nac\n	n	-	-
776'ab\Z'm	b\nac	n	-	-
777'ab\z'm	b\nac	n	-	-
778'ab$'m	b\nac	n	-	-
779ab\Z	ca\nb\n	n	-	-
780ab\z	ca\nb\n	n	-	-
781ab$	ca\nb\n	n	-	-
782ab\Z	b\nca\n	n	-	-
783ab\z	b\nca\n	n	-	-
784ab$	b\nca\n	n	-	-
785ab\Z	b\nca	n	-	-
786ab\z	b\nca	n	-	-
787ab$	b\nca	n	-	-
788'ab\Z'm	ca\nb\n	n	-	-
789'ab\z'm	ca\nb\n	n	-	-
790'ab$'m	ca\nb\n	n	-	-
791'ab\Z'm	b\nca\n	n	-	-
792'ab\z'm	b\nca\n	n	-	-
793'ab$'m	b\nca\n	n	-	-
794'ab\Z'm	b\nca	n	-	-
795'ab\z'm	b\nca	n	-	-
796'ab$'m	b\nca	n	-	-
797abb\Z	abb\nb\n	n	-	-
798abb\z	abb\nb\n	n	-	-
799abb$	abb\nb\n	n	-	-
800abb\Z	b\nabb\n	y	$-[0]	2
801abb\z	b\nabb\n	n	-	-
802abb$	b\nabb\n	y	$-[0]	2
803abb\Z	b\nabb	y	$-[0]	2
804abb\z	b\nabb	y	$-[0]	2
805abb$	b\nabb	y	$-[0]	2
806'abb\Z'm	abb\nb\n	n	-	-
807'abb\z'm	abb\nb\n	n	-	-
808'abb$'m	abb\nb\n	y	$-[0]	0
809'abb\Z'm	b\nabb\n	y	$-[0]	2
810'abb\z'm	b\nabb\n	n	-	-
811'abb$'m	b\nabb\n	y	$-[0]	2
812'abb\Z'm	b\nabb	y	$-[0]	2
813'abb\z'm	b\nabb	y	$-[0]	2
814'abb$'m	b\nabb	y	$-[0]	2
815abb\Z	ac\nb\n	n	-	-
816abb\z	ac\nb\n	n	-	-
817abb$	ac\nb\n	n	-	-
818abb\Z	b\nac\n	n	-	-
819abb\z	b\nac\n	n	-	-
820abb$	b\nac\n	n	-	-
821abb\Z	b\nac	n	-	-
822abb\z	b\nac	n	-	-
823abb$	b\nac	n	-	-
824'abb\Z'm	ac\nb\n	n	-	-
825'abb\z'm	ac\nb\n	n	-	-
826'abb$'m	ac\nb\n	n	-	-
827'abb\Z'm	b\nac\n	n	-	-
828'abb\z'm	b\nac\n	n	-	-
829'abb$'m	b\nac\n	n	-	-
830'abb\Z'm	b\nac	n	-	-
831'abb\z'm	b\nac	n	-	-
832'abb$'m	b\nac	n	-	-
833abb\Z	ca\nb\n	n	-	-
834abb\z	ca\nb\n	n	-	-
835abb$	ca\nb\n	n	-	-
836abb\Z	b\nca\n	n	-	-
837abb\z	b\nca\n	n	-	-
838abb$	b\nca\n	n	-	-
839abb\Z	b\nca	n	-	-
840abb\z	b\nca	n	-	-
841abb$	b\nca	n	-	-
842'abb\Z'm	ca\nb\n	n	-	-
843'abb\z'm	ca\nb\n	n	-	-
844'abb$'m	ca\nb\n	n	-	-
845'abb\Z'm	b\nca\n	n	-	-
846'abb\z'm	b\nca\n	n	-	-
847'abb$'m	b\nca\n	n	-	-
848'abb\Z'm	b\nca	n	-	-
849'abb\z'm	b\nca	n	-	-
850'abb$'m	b\nca	n	-	-
851(^|x)(c)	ca	y	$2	c
852a*abc?xyz+pqr{3}ab{2,}xy{4,5}pq{0,6}AB{0,}zz	x	n	-	-
853a(?{$a=2;$b=3;($b)=$a})b	yabz	y	$b	2
854round\(((?>[^()]+))\)	_I(round(xs * sz),1)	y	$1	xs * sz
855'((?x:.) )'	x 	y	$1-	x -
856'((?-x:.) )'x	x 	y	$1-	x-
857foo.bart	foo.bart	y	-	-
858'^d[x][x][x]'m	abcd\ndxxx	y	-	-
859.X(.+)+X	bbbbXcXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
860.X(.+)+XX	bbbbXcXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
861.XX(.+)+X	bbbbXXcXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
862.X(.+)+X	bbbbXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
863.X(.+)+XX	bbbbXXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
864.XX(.+)+X	bbbbXXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
865.X(.+)+[X]	bbbbXcXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
866.X(.+)+[X][X]	bbbbXcXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
867.XX(.+)+[X]	bbbbXXcXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
868.X(.+)+[X]	bbbbXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
869.X(.+)+[X][X]	bbbbXXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
870.XX(.+)+[X]	bbbbXXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
871.[X](.+)+[X]	bbbbXcXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
872.[X](.+)+[X][X]	bbbbXcXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
873.[X][X](.+)+[X]	bbbbXXcXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	-	-
874.[X](.+)+[X]	bbbbXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
875.[X](.+)+[X][X]	bbbbXXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
876.[X][X](.+)+[X]	bbbbXXXaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	n	-	-
877tt+$	xxxtt	y	-	-
878([a-\d]+)	za-9z	y	$1	a-9
879([\d-z]+)	a0-za	y	$1	0-z
880([\d-\s]+)	a0- z	y	$1	0-
881([a-[:digit:]]+)	za-9z	y	$1	a-9
882([[:digit:]-z]+)	=0-z=	y	$1	0-z
883([[:digit:]-[:alpha:]]+)	=0-z=	y	$1	0-z
884\GX.*X	aaaXbX	n	-	-
885(\d+\.\d+)	3.1415926	y	$1	3.1415926
886(\ba.{0,10}br)	have a web browser	y	$1	a web br
887'\.c(pp|xx|c)?$'i	Changes	n	-	-
888'\.c(pp|xx|c)?$'i	IO.c	y	-	-
889'(\.c(pp|xx|c)?$)'i	IO.c	y	$1	.c
890^([a-z]:)	C:/	n	-	-
891'^\S\s+aa$'m	\nx aa	y	-	-
892(^|a)b	ab	y	-	-
893^([ab]*?)(b)?(c)$	abac	y	-$2-	--
894(\w)?(abc)\1b	abcab	n	-	-
895^(?:.,){2}c	a,b,c	y	-	-
896^(.,){2}c	a,b,c	y	$1	b,
897^(?:[^,]*,){2}c	a,b,c	y	-	-
898^([^,]*,){2}c	a,b,c	y	$1	b,
899^([^,]*,){3}d	aaa,b,c,d	y	$1	c,
900^([^,]*,){3,}d	aaa,b,c,d	y	$1	c,
901^([^,]*,){0,3}d	aaa,b,c,d	y	$1	c,
902^([^,]{1,3},){3}d	aaa,b,c,d	y	$1	c,
903^([^,]{1,3},){3,}d	aaa,b,c,d	y	$1	c,
904^([^,]{1,3},){0,3}d	aaa,b,c,d	y	$1	c,
905^([^,]{1,},){3}d	aaa,b,c,d	y	$1	c,
906^([^,]{1,},){3,}d	aaa,b,c,d	y	$1	c,
907^([^,]{1,},){0,3}d	aaa,b,c,d	y	$1	c,
908^([^,]{0,3},){3}d	aaa,b,c,d	y	$1	c,
909^([^,]{0,3},){3,}d	aaa,b,c,d	y	$1	c,
910^([^,]{0,3},){0,3}d	aaa,b,c,d	y	$1	c,
911(?i)		y	-	-
912(?a:((?u)\w)\W)	\xC0\xC0	y	$&	\xC0\xC0
913'(?!\A)x'm	a\nxb\n	y	-	-
914^(a(b)?)+$	aba	y	-$1-$2-	-a--
915^(aa(bb)?)+$	aabbaa	y	-$1-$2-	-aa--
916'^.{9}abc.*\n'm	123\nabcabcabcabc\n	y	-	-
917^(a)?a$	a	y	-$1-	--
918^(a)?(?(1)a|b)+$	a	n	-	-
919^(a\1?)(a\1?)(a\2?)(a\3?)$	aaaaaa	y	$1,$2,$3,$4	a,aa,a,aa
920^(a\1?){4}$	aaaaaa	y	$1	aa
921^(0+)?(?:x(1))?	x1	y	-	-
922^([0-9a-fA-F]+)(?:x([0-9a-fA-F]+)?)(?:x([0-9a-fA-F]+))?	012cxx0190	y	-	-
923^(b+?|a){1,2}c	bbbac	y	$1	a
924^(b+?|a){1,2}c	bbbbac	y	$1	a
925\((\w\. \w+)\)	cd. (A. Tw)	y	-$1-	-A. Tw-
926((?:aaaa|bbbb)cccc)?	aaaacccc	y	-	-
927((?:aaaa|bbbb)cccc)?	bbbbcccc	y	-	-
928(a)?(a)+	a	y	$1:$2	:a	-
929(ab)?(ab)+	ab	y	$1:$2	:ab	-
930(abc)?(abc)+	abc	y	$1:$2	:abc	-
931'b\s^'m	a\nb\n	n	-	-
932\ba	a	y	-	-
933^(a(??{"(?!)"})|(a)(?{1}))b	ab	y	$2	a	# [ID 20010811.006]
934ab(?i)cd	AbCd	n	-	-	# [ID 20010809.023]
935ab(?i)cd	abCd	y	-	-
936(A|B)*(?(1)(CD)|(CD))	CD	y	$2-$3	-CD
937(A|B)*(?(1)(CD)|(CD))	ABCD	y	$2-$3	CD-
938(A|B)*?(?(1)(CD)|(CD))	CD	y	$2-$3	-CD	# [ID 20010803.016]
939(A|B)*?(?(1)(CD)|(CD))	ABCD	y	$2-$3	CD-
940'^(o)(?!.*\1)'i	Oo	n	-	-
941(.*)\d+\1	abc12bc	y	$1	bc
942(?m:(foo\s*$))	foo\n bar	y	$1	foo
943(.*)c	abcd	y	$1	ab
944(.*)(?=c)	abcd	y	$1	ab
945(.*)(?=c)c	abcd	yB	$1	ab
946(.*)(?=b|c)	abcd	y	$1	ab
947(.*)(?=b|c)c	abcd	y	$1	ab
948(.*)(?=c|b)	abcd	y	$1	ab
949(.*)(?=c|b)c	abcd	y	$1	ab
950(.*)(?=[bc])	abcd	y	$1	ab
951(.*)(?=[bc])c	abcd	yB	$1	ab
952(.*)(?<=b)	abcd	y	$1	ab
953(.*)(?<=b)c	abcd	y	$1	ab
954(.*)(?<=b|c)	abcd	y	$1	abc
955(.*)(?<=b|c)c	abcd	y	$1	ab
956(.*)(?<=c|b)	abcd	y	$1	abc
957(.*)(?<=c|b)c	abcd	y	$1	ab
958(.*)(?<=[bc])	abcd	y	$1	abc
959(.*)(?<=[bc])c	abcd	y	$1	ab
960(.*?)c	abcd	y	$1	ab
961(.*?)(?=c)	abcd	y	$1	ab
962(.*?)(?=c)c	abcd	yB	$1	ab
963(.*?)(?=b|c)	abcd	y	$1	a
964(.*?)(?=b|c)c	abcd	y	$1	ab
965(.*?)(?=c|b)	abcd	y	$1	a
966(.*?)(?=c|b)c	abcd	y	$1	ab
967(.*?)(?=[bc])	abcd	y	$1	a
968(.*?)(?=[bc])c	abcd	yB	$1	ab
969(.*?)(?<=b)	abcd	y	$1	ab
970(.*?)(?<=b)c	abcd	y	$1	ab
971(.*?)(?<=b|c)	abcd	y	$1	ab
972(.*?)(?<=b|c)c	abcd	y	$1	ab
973(.*?)(?<=c|b)	abcd	y	$1	ab
974(.*?)(?<=c|b)c	abcd	y	$1	ab
975(.*?)(?<=[bc])	abcd	y	$1	ab
976(.*?)(?<=[bc])c	abcd	y	$1	ab
9772(]*)?$\1	2	y	$&	2
978(??{})	x	y	-	-
979a(b)??	abc	y	<$1>	<>	# undef [perl #16773]
980(\d{1,3}\.){3,}	128.134.142.8	y	<$1>	<142.>	# [perl #18019]
981^.{3,4}(.+)\1\z	foobarbar	y	$1	bar	# 16 tests for [perl #23171]
982^(?:f|o|b){3,4}(.+)\1\z	foobarbar	y	$1	bar
983^.{3,4}((?:b|a|r)+)\1\z	foobarbar	y	$1	bar
984^(?:f|o|b){3,4}((?:b|a|r)+)\1\z	foobarbar	y	$1	bar
985^.{3,4}(.+?)\1\z	foobarbar	y	$1	bar
986^(?:f|o|b){3,4}(.+?)\1\z	foobarbar	y	$1	bar
987^.{3,4}((?:b|a|r)+?)\1\z	foobarbar	y	$1	bar
988^(?:f|o|b){3,4}((?:b|a|r)+?)\1\z	foobarbar	y	$1	bar
989^.{2,3}?(.+)\1\z	foobarbar	y	$1	bar
990^(?:f|o|b){2,3}?(.+)\1\z	foobarbar	y	$1	bar
991^.{2,3}?((?:b|a|r)+)\1\z	foobarbar	y	$1	bar
992^(?:f|o|b){2,3}?((?:b|a|r)+)\1\z	foobarbar	y	$1	bar
993^.{2,3}?(.+?)\1\z	foobarbar	y	$1	bar
994^(?:f|o|b){2,3}?(.+?)\1\z	foobarbar	y	$1	bar
995^.{2,3}?((?:b|a|r)+?)\1\z	foobarbar	y	$1	bar
996^(?:f|o|b){2,3}?((?:b|a|r)+?)\1\z	foobarbar	y	$1	bar
997.*a(?!(b|cd)*e).*f	......abef	n	-	-	# [perl #23030]
998x(?#	x	c	-	Sequence (?#... not terminated
999:x(?#:	x	c	-	Sequence (?#... not terminated
1000(WORDS|WORD)S	WORDS	y	$1	WORD
1001(X.|WORDS|X.|WORD)S	WORDS	y	$1	WORD
1002(WORDS|WORLD|WORD)S	WORDS	y	$1	WORD
1003(X.|WORDS|WORD|Y.)S	WORDS	y	$1	WORD
1004(foo|fool|x.|money|parted)$	fool	y	$1	fool
1005(x.|foo|fool|x.|money|parted|y.)$	fool	y	$1	fool
1006(foo|fool|money|parted)$	fool	y	$1	fool
1007(foo|fool|x.|money|parted)$	fools	n	-	-
1008(x.|foo|fool|x.|money|parted|y.)$	fools	n	-	-
1009(foo|fool|money|parted)$	fools	n	-	-
1010(a|aa|aaa||aaaa|aaaaa|aaaaaa)(b|c)	aaaaaaaaaaaaaaab	y	$1$2	aaaaaab
1011(a|aa|aaa||aaaa|aaaaa|aaaaaa)(??{$1&&""})(b|c)	aaaaaaaaaaaaaaab	y	$1$2	aaaaaab
1012(a|aa|aaa|aaaa|aaaaa|aaaaaa)(??{$1&&"foo"})(b|c)	aaaaaaaaaaaaaaab	n	-	-
1013^(a*?)(?!(aa|aaaa)*$)	aaaaaaaaaaaaaaaaaaaa	y	$1	a	# [perl #34195]
1014^(a*?)(?!(aa|aaaa)*$)(?=a\z)	aaaaaaaa	y	$1	aaaaaaa
1015^(.)\s+.$(?(1))	A B	y	$1	A	# [perl #37688]
1016(?:r?)*?r|(.{2,4})	abcde	y	$1	abcd
1017(?!)+?|(.{2,4})	abcde	y	$1	abcd
1018^(a*?)(?!(a{6}|a{5})*$)	aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa	y	$+[1]	12	# super-linear cache bug may return 18
1019^((?>(?:aa)?b)?)	aab	y	$1	aab
1020^((?:aa)*)(?:X+((?:\d+|-)(?:X+(.+))?))?$	aaaaX5	y	$1	aaaa
1021X(A|B||C|D)Y	XXXYYY	y	$&	XY	# Trie w/ NOTHING
1022(?i:X([A]|[B]|y[Y]y|[D]|)Y)	XXXYYYB	y	$&	XY	# Trie w/ NOTHING
1023^([a]{1})*$	aa	y	$1	a
1024a(?!b(?!c))(..)	abababc	y	$1	bc	# test nested negatives
1025a(?!b(?=a))(..)	abababc	y	$1	bc	# test nested lookaheads
1026a(?!b(?!c(?!d(?!e))))...(.)	abxabcdxabcde	y	$1	e
1027X(?!b+(?!(c+)*(?!(c+)*d))).*X	aXbbbbbbbcccccccccccccaaaX	y	-	-
1028^(XXXXXXXXXX|YYYYYYYYYY|Z.Q*X|Z[TE]Q*P):	ZEQQQQQQQQQQQQQQQQQQP:	y	$1	ZEQQQQQQQQQQQQQQQQQQP
1029^(XXXXXXXXXX|YYYYYYYYYY|Z.Q*X|Z[TE]Q*P):	ZEQQQX:	y	$1	ZEQQQX
1030^([TUV]+|XXXXXXXXXX|YYYYYYYYYY|Z.Q*X|Z[TE]Q*P):	ZEQQQQQQQQQQQQQQQQQQP:	y	$1	ZEQQQQQQQQQQQQQQQQQQP
1031^([TUV]+|XXXXXXXXXX|YYYYYYYYYY|Z.Q*X|Z[TE]Q*P):	ZEQQQX:	y	$1	ZEQQQX
1032^([TUV]+|XXXXXXXXXX|YYYYYYYYYY|Z.Q*X|Z[TE]Q*P|[MKJ]):	ZEQQQQQQQQQQQQQQQQQQP:	y	$1	ZEQQQQQQQQQQQQQQQQQQP
1033^([TUV]+|XXXXXXXXXX|YYYYYYYYYY|Z.Q*X|Z[TE]Q*P|[MKJ]):	ZEQQQX:	y	$1	ZEQQQX
1034^(XXX|YYY|Z.Q*X|Z[TE]Q*P):	ZEQQQQQQQQQQQQQQQQQQP:	y	$1	ZEQQQQQQQQQQQQQQQQQQP
1035^(XXX|YYY|Z.Q*X|Z[TE]Q*P):	ZEQQQX:	y	$1	ZEQQQX
1036^([TUV]+|XXX|YYY|Z.Q*X|Z[TE]Q*P):	ZEQQQQQQQQQQQQQQQQQQP:	y	$1	ZEQQQQQQQQQQQQQQQQQQP
1037^([TUV]+|XXX|YYY|Z.Q*X|Z[TE]Q*P):	ZEQQQX:	y	$1	ZEQQQX
1038^([TUV]+|XXX|YYY|Z.Q*X|Z[TE]Q*P|[MKJ]):	ZEQQQQQQQQQQQQQQQQQQP:	y	$1	ZEQQQQQQQQQQQQQQQQQQP
1039^([TUV]+|XXX|YYY|Z.Q*X|Z[TE]Q*P|[MKJ]):	ZEQQQX:	y	$1	ZEQQQX
1040X(?:ABCF[cC]x*|ABCD|ABCF):(?:DIT|DID|DIM)	XABCFCxxxxxxxxxx:DIM	y	$&	XABCFCxxxxxxxxxx:DIM
1041(((ABCD|ABCE|ABCF)))(A|B|C[xy]*):	ABCFCxxxxxxxxxx:DIM	y	$&	ABCFCxxxxxxxxxx:
1042(?=foo)	foo	y	pos	0
1043(?=foo)	XfooY	y	pos	1
1044.*(?=foo)	XfooY	y	pos	1
1045(?<=foo)	foo	y	pos	3
1046(?<=foo)	XfooY	y	pos	4
1047.*(?<=foo)	foo	y	pos	3
1048.*(?<=foo)	XfooY	y	pos	4
1049(?<=foo)Y	XfooY	y	pos	5
1050o(?<=foo)Y	..XfooY..	y	pos	7
1051X(?=foo)f	..XfooY..	y	pos	4
1052X(?=foo)	..XfooY..	y	pos	3
1053X(?<=foo.)[YZ]	..XfooXY..	y	pos	8
1054(?=XY*foo)	Xfoo	y	pos	0
1055^(?=XY*foo)	Xfoo	y	pos	0
1056^(??{"a+"})a	aa	y	$&	aa
1057^(?:(??{"a+"})|b)a	aa	y	$&	aa
1058^(??{chr 0x100}).$	\x{100}\x{100}	y	$&	\x{100}\x{100}
1059^(??{q(\x{100})}).	\x{100}\x{100}	y	$&	\x{100}\x{100}
1060^(??{q(.+)})\x{100}	\x{100}\x{100}	y	$&	\x{100}\x{100}
1061^(??{q(.)})\x{100}	\x{100}\x{100}	y	$&	\x{100}\x{100}
1062^(??{chr 0x100})\xbb	\x{100}\x{bb}	y	$&	\x{100}\x{bb}
1063^(.)(??{"(.)(.)"})(.)$	abcd	y	$1-$2	a-d
1064^(.)(??{"(bz+|.)(.)"})(.)$	abcd	y	$1-$2	a-d
1065^(.)((??{"(.)(cz+)"})|.)	abcd	y	$1-$2	a-b
1066^a(?>(??{q(b)}))(??{q(c)})d	abcd	y	-	-
1067^x(??{""})+$	x	y	$&	x
1068^(<(?:[^<>]+|(?3)|(?1))*>)()(!>!>!>)$	<<!>!>!>><>>!>!>!>	y	$1	<<!>!>!>><>>
1069^(<(?:[^<>]+|(?1))*>)$	<<><<<><>>>>	y	$1	<<><<<><>>>>
1070((?2)*)([fF]o+)	fooFoFoo	y	$1-$2	fooFo-Foo
1071(<(?:[^<>]+|(?R))*>)	<<><<<><>>>>	y	$1	<<><<<><>>>>
1072(?<n>foo|bar|baz)	snofooewa	y	$1	foo
1073(?<n>foo|bar|baz)	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1074(?<n>foo|bar|baz)(?<m>[ew]+)	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1075(?<n>foo|bar|baz)(?<m>[ew]+)	snofooewa	yM	$+{m}	ew	miniperl cannot load Tie::Hash::NamedCapture
1076(?<n>foo)|(?<n>bar)|(?<n>baz)	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1077(?<n>foo)(??{ $+{n} })	snofooefoofoowaa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1078(?P<n>foo|bar|baz)	snofooewa	y	$1	foo
1079(?P<n>foo|bar|baz)	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1080(?P<n>foo|bar|baz)(?P<m>[ew]+)	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1081(?P<n>foo|bar|baz)(?P<m>[ew]+)	snofooewa	yM	$+{m}	ew	miniperl cannot load Tie::Hash::NamedCapture
1082(?P<n>foo)|(?P<n>bar)|(?P<n>baz)	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1083(?P<n>foo)(??{ $+{n} })	snofooefoofoowaa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1084(?P<=n>foo|bar|baz)	snofooewa	c	-	Sequence (?P<=...) not recognized
1085(?P<!n>foo|bar|baz)	snofooewa	c	-	Sequence (?P<!...) not recognized
1086(?PX<n>foo|bar|baz)	snofooewa	c	-	Sequence (?PX<...) not recognized
1087/(?'n'foo|bar|baz)/	snofooewa	y	$1	foo
1088/(?'n'foo|bar|baz)/	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1089/(?'n'foo|bar|baz)(?'m'[ew]+)/	snofooewa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1090/(?'n'foo|bar|baz)(?'m'[ew]+)/	snofooewa	yM	$+{m}	ew	miniperl cannot load Tie::Hash::NamedCapture
1091/(?'n'foo)|(?'n'bar)|(?<n>baz)/	snobazewa	yM	$+{n}	baz	miniperl cannot load Tie::Hash::NamedCapture
1092/(?'n'foo)(??{ $+{n} })/	snofooefoofoowaa	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1093/(?'n'foo)\k<n>/	..foofoo..	y	$1	foo
1094/(?'n'foo)\k<n>/	..foofoo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1095/(?<n>foo)\k'n'/	..foofoo..	y	$1	foo
1096/(?<n>foo)\k'n'/	..foofoo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1097/(?:(?<n>foo)|(?<n>bar))\k<n>/	..barbar..	yM	$+{n}	bar	miniperl cannot load Tie::Hash::NamedCapture
1098/^(?'main'<(?:[^<>]+|(?&crap)|(?&main))*>)(?'empty')(?'crap'!>!>!>)$/	<<!>!>!>><>>!>!>!>	yM	$+{main}	<<!>!>!>><>>	miniperl cannot load Tie::Hash::NamedCapture
1099/^(?'main'<(?:[^<>]+|(?&main))*>)$/	<<><<<><>>>>	y	$1	<<><<<><>>>>
1100/(?'first'(?&second)*)(?'second'[fF]o+)/	fooFoFoo	yM	$+{first}-$+{second}	fooFo-Foo	miniperl cannot load Tie::Hash::NamedCapture
1101(?<A>foo)?(?(<A>)bar|nada)	foobar	yM	$+{A}	foo	miniperl cannot load Tie::Hash::NamedCapture
1102(?<A>foo)?(?(<A>)bar|nada)	foo-barnada	y	$&	nada
1103(?<A>foo)?(?(1)bar|nada)	foo-barnada	y	$&	nada
1104(?<A>foo(?(R)bar))?(?1)	foofoobar	y	$1	foo
1105(?<A>foo(?(R)bar))?(?1)	foofoobar	y	$&	foofoobar
1106(x)(?<A>foo(?(R&A)bar))?(?&A)	xfoofoobar	y	$2	foo
1107(x)(?<A>foo(?(R&A)bar))?(?&A)	xfoofoobar	y	$&	xfoofoobar
1108(x)(?<A>foo(?(R2)bar))?(?&A)	xfoofoobar	y	$2	foo
1109(x)(?<A>foo(?(R2)bar))?(?&A)	xfoofoobar	y	$&	xfoofoobar
1110(?1)(?(DEFINE)(blah))	blah	y	$&	blah
1111/^(?<PAL>(?<CHAR>.)((?&PAL)|.?)\k<CHAR>)$/	madamimadam	y	$&	madamimadam
1112/^(?<PAL>(?<CHAR>.)((?&PAL)|.?)\k<CHAR>)$/	madamiamadam	n	-	-
1113/(a)?((?1))(fox)/	aafox	y	$1-$2-$3	a-a-fox
1114/(a)*((?1))(fox)/	aafox	y	$1-$2-$3	a-a-fox
1115/(a)+((?1))(fox)/	aafox	y	$1-$2-$3	a-a-fox
1116/(a){1,100}((?1))(fox)/	aafox	y	$1-$2-$3	a-a-fox
1117/(a){0,100}((?1))(fox)/	aafox	y	$1-$2-$3	a-a-fox
1118/(ab)?((?1))(fox)/	ababfox	y	$1-$2-$3	ab-ab-fox
1119/(ab)*((?1))(fox)/	ababfox	y	$1-$2-$3	ab-ab-fox
1120/(ab)+((?1))(fox)/	ababfox	y	$1-$2-$3	ab-ab-fox
1121/(ab){1,100}((?1))(fox)/	ababfox	y	$1-$2-$3	ab-ab-fox
1122/(ab){0,100}((?1))(fox)/	ababfox	y	$1-$2-$3	ab-ab-fox
1123# possessive captures
1124a++a	aaaaa	n	-	-
1125a*+a	aaaaa	n	-	-
1126a{1,5}+a	aaaaa	n	-	-
1127a?+a	ab	n	-	-
1128a++b	aaaaab	y	$&	aaaaab
1129a*+b	aaaaab	y	$&	aaaaab
1130a{1,5}+b	aaaaab	y	$&	aaaaab
1131a?+b	ab	y	$&	ab
1132fooa++a	fooaaaaa	n	-	-
1133fooa*+a	fooaaaaa	n	-	-
1134fooa{1,5}+a	fooaaaaa	n	-	-
1135fooa?+a	fooab	n	-	-
1136fooa++b	fooaaaaab	y	$&	fooaaaaab
1137fooa*+b	fooaaaaab	y	$&	fooaaaaab
1138fooa{1,5}+b	fooaaaaab	y	$&	fooaaaaab
1139fooa?+b	fooab	y	$&	fooab
1140(?:aA)++(?:aA)	aAaAaAaAaA	n	-	aAaAaAaAaA
1141(aA)++(aA)	aAaAaAaAaA	n	-	aAaAaAaAaA
1142(aA|bB)++(aA|bB)	aAaAbBaAbB	n	-	aAaAbBaAbB
1143(?:aA|bB)++(?:aA|bB)	aAbBbBbBaA	n	-	aAbBbBbBaA
1144(?:aA)*+(?:aA)	aAaAaAaAaA	n	-	aAaAaAaAaA
1145(aA)*+(aA)	aAaAaAaAaA	n	-	aAaAaAaAaA
1146(aA|bB)*+(aA|bB)	aAaAbBaAaA	n	-	aAaAbBaAaA
1147(?:aA|bB)*+(?:aA|bB)	aAaAaAbBaA	n	-	aAaAaAbBaA
1148(?:aA){1,5}+(?:aA)	aAaAaAaAaA	n	-	aAaAaAaAaA
1149(aA){1,5}+(aA)	aAaAaAaAaA	n	-	aAaAaAaAaA
1150(aA|bB){1,5}+(aA|bB)	aAaAbBaAaA	n	-	aAaAbBaAaA
1151(?:aA|bB){1,5}+(?:aA|bB)	bBbBbBbBbB	n	-	bBbBbBbBbB
1152(?:aA)?+(?:aA)	aAb	n	-	aAb
1153(aA)?+(aA)	aAb	n	-	aAb
1154(aA|bB)?+(aA|bB)	bBb	n	-	bBb
1155(?:aA|bB)?+(?:aA|bB)	aAb	n	-	aAb
1156(?:aA)++b	aAaAaAaAaAb	y	$&	aAaAaAaAaAb
1157(aA)++b	aAaAaAaAaAb	y	$&	aAaAaAaAaAb
1158(aA|bB)++b	aAbBaAaAbBb	y	$&	aAbBaAaAbBb
1159(?:aA|bB)++b	aAbBbBaAaAb	y	$&	aAbBbBaAaAb
1160(?:aA)*+b	aAaAaAaAaAb	y	$&	aAaAaAaAaAb
1161(aA)*+b	aAaAaAaAaAb	y	$&	aAaAaAaAaAb
1162(aA|bB)*+b	bBbBbBbBbBb	y	$&	bBbBbBbBbBb
1163(?:aA|bB)*+b	bBaAbBbBaAb	y	$&	bBaAbBbBaAb
1164(?:aA){1,5}+b	aAaAaAaAaAb	y	$&	aAaAaAaAaAb
1165(aA){1,5}+b	aAaAaAaAaAb	y	$&	aAaAaAaAaAb
1166(aA|bB){1,5}+b	bBaAbBaAbBb	y	$&	bBaAbBaAbBb
1167(?:aA|bB){1,5}+b	aAbBaAbBbBb	y	$&	aAbBaAbBbBb
1168(?:aA)?+b	aAb	y	$&	aAb
1169(aA)?+b	aAb	y	$&	aAb
1170(aA|bB)?+b	bBb	y	$&	bBb
1171(?:aA|bB)?+b	bBb	y	$&	bBb
1172foo(?:aA)++(?:aA)	fooaAaAaAaAaA	n	-	fooaAaAaAaAaA
1173foo(aA)++(aA)	fooaAaAaAaAaA	n	-	fooaAaAaAaAaA
1174foo(aA|bB)++(aA|bB)	foobBbBbBaAaA	n	-	foobBbBbBaAaA
1175foo(?:aA|bB)++(?:aA|bB)	fooaAaAaAaAaA	n	-	fooaAaAaAaAaA
1176foo(?:aA)*+(?:aA)	fooaAaAaAaAaA	n	-	fooaAaAaAaAaA
1177foo(aA)*+(aA)	fooaAaAaAaAaA	n	-	fooaAaAaAaAaA
1178foo(aA|bB)*+(aA|bB)	foobBaAbBaAaA	n	-	foobBaAbBaAaA
1179foo(?:aA|bB)*+(?:aA|bB)	fooaAaAbBbBaA	n	-	fooaAaAbBbBaA
1180foo(?:aA){1,5}+(?:aA)	fooaAaAaAaAaA	n	-	fooaAaAaAaAaA
1181foo(aA){1,5}+(aA)	fooaAaAaAaAaA	n	-	fooaAaAaAaAaA
1182foo(aA|bB){1,5}+(aA|bB)	fooaAbBbBaAaA	n	-	fooaAbBbBaAaA
1183foo(?:aA|bB){1,5}+(?:aA|bB)	fooaAbBbBaAbB	n	-	fooaAbBbBaAbB
1184foo(?:aA)?+(?:aA)	fooaAb	n	-	fooaAb
1185foo(aA)?+(aA)	fooaAb	n	-	fooaAb
1186foo(aA|bB)?+(aA|bB)	foobBb	n	-	foobBb
1187foo(?:aA|bB)?+(?:aA|bB)	fooaAb	n	-	fooaAb
1188foo(?:aA)++b	fooaAaAaAaAaAb	y	$&	fooaAaAaAaAaAb
1189foo(aA)++b	fooaAaAaAaAaAb	y	$&	fooaAaAaAaAaAb
1190foo(aA|bB)++b	foobBaAbBaAbBb	y	$&	foobBaAbBaAbBb
1191foo(?:aA|bB)++b	fooaAaAbBaAaAb	y	$&	fooaAaAbBaAaAb
1192foo(?:aA)*+b	fooaAaAaAaAaAb	y	$&	fooaAaAaAaAaAb
1193foo(aA)*+b	fooaAaAaAaAaAb	y	$&	fooaAaAaAaAaAb
1194foo(aA|bB)*+b	foobBbBaAaAaAb	y	$&	foobBbBaAaAaAb
1195foo(?:aA|bB)*+b	foobBaAaAbBaAb	y	$&	foobBaAaAbBaAb
1196foo(?:aA){1,5}+b	fooaAaAaAaAaAb	y	$&	fooaAaAaAaAaAb
1197foo(aA){1,5}+b	fooaAaAaAaAaAb	y	$&	fooaAaAaAaAaAb
1198foo(aA|bB){1,5}+b	foobBaAaAaAaAb	y	$&	foobBaAaAaAaAb
1199foo(?:aA|bB){1,5}+b	fooaAbBaAbBbBb	y	$&	fooaAbBaAbBbBb
1200foo(?:aA)?+b	fooaAb	y	$&	fooaAb
1201foo(aA)?+b	fooaAb	y	$&	fooaAb
1202foo(aA|bB)?+b	foobBb	y	$&	foobBb
1203foo(?:aA|bB)?+b	foobBb	y	$&	foobBb
1204
1205([^()]++|\([^()]*\))+	((abc(ade)ufh()()x	y	$&	abc(ade)ufh()()x
1206round\(([^()]++)\)	_I(round(xs * sz),1)	y	$1	xs * sz
1207
1208(foo[1x]|bar[2x]|baz[3x])+y	foo1bar2baz3y	y	$1	baz3
1209(foo[1x]|bar[2x]|baz[3x])+y	foo1bar2baz3y	y	$&	foo1bar2baz3y
1210(foo[1x]|bar[2x]|baz[3x])*y	foo1bar2baz3y	y	$1	baz3
1211(foo[1x]|bar[2x]|baz[3x])*y	foo1bar2baz3y	y	$&	foo1bar2baz3y
1212
1213([yX].|WORDS|[yX].|WORD)S	WORDS	y	$1	WORD
1214(WORDS|WORLD|WORD)S	WORDS	y	$1	WORD
1215([yX].|WORDS|WORD|[xY].)S	WORDS	y	$1	WORD
1216(foo|fool|[zx].|money|parted)$	fool	y	$1	fool
1217([zx].|foo|fool|[zq].|money|parted|[yx].)$	fool	y	$1	fool
1218(foo|fool|[zx].|money|parted)$	fools	n	-	-
1219([zx].|foo|fool|[qx].|money|parted|[py].)$	fools	n	-	-
1220
1221([yX].|WORDS|[yX].|WORD)+S	WORDS	y	$1	WORD
1222(WORDS|WORLD|WORD)+S	WORDS	y	$1	WORD
1223([yX].|WORDS|WORD|[xY].)+S	WORDS	y	$1	WORD
1224(foo|fool|[zx].|money|parted)+$	fool	y	$1	fool
1225([zx].|foo|fool|[zq].|money|parted|[yx].)+$	fool	y	$1	fool
1226(foo|fool|[zx].|money|parted)+$	fools	n	-	-
1227([zx].|foo|fool|[qx].|money|parted|[py].)+$	fools	n	-	-
1228
1229(x|y|z[QW])+(longish|loquatious|excessive|overblown[QW])+	xyzQzWlongishoverblownW	y	$1-$2	zW-overblownW
1230(x|y|z[QW])*(longish|loquatious|excessive|overblown[QW])*	xyzQzWlongishoverblownW	y	$1-$2	zW-overblownW
1231(x|y|z[QW]){1,5}(longish|loquatious|excessive|overblown[QW]){1,5}	xyzQzWlongishoverblownW	y	$1-$2	zW-overblownW
1232
1233(x|y|z[QW])++(longish|loquatious|excessive|overblown[QW])++	xyzQzWlongishoverblownW	y	$1-$2	zW-overblownW
1234(x|y|z[QW])*+(longish|loquatious|excessive|overblown[QW])*+	xyzQzWlongishoverblownW	y	$1-$2	zW-overblownW
1235(x|y|z[QW]){1,5}+(longish|loquatious|excessive|overblown[QW]){1,5}+	xyzQzWlongishoverblownW	y	$1-$2	zW-overblownW
1236
1237a*(?!)	aaaab	n	-	-
1238a*(*FAIL)	aaaab	n	-	-
1239a*(*F)	aaaab	n	-	-
1240
1241(A(A|B(*ACCEPT)|C)D)(E)	AB	y	$1	AB
1242(A(A|B(*ACCEPT)|C)D)(E)	ACDE	y	$1$2$3	ACDCE
1243
1244(a)(?:(?-1)|(?+1))(b)	aab	y	$&-$1-$2	aab-a-b
1245(a)(?:(?-1)|(?+1))(b)	abb	y	$1-$2	a-b
1246(a)(?:(?-1)|(?+1))(b)	acb	n	-	-
1247
1248(foo)(\g-2)	foofoo	y	$1-$2	foo-foo
1249(foo)(\g-2)(foo)(\g-2)	foofoofoofoo	y	$1-$2-$3-$4	foo-foo-foo-foo
1250(([abc]+) \g-1)(([abc]+) \g{-1})	abc abccba cba	y	$2-$4	abc-cba
1251(a)(b)(c)\g1\g2\g3	abcabc	y	$1$2$3	abc
1252
1253# \k<n> preceded by a literal
1254/(?'n'foo) \k<n>/	..foo foo..	y	$1	foo
1255/(?'n'foo) \k<n>/	..foo foo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1256/(?<n>foo) \k'n'/	..foo foo..	y	$1	foo
1257/(?<n>foo) \k'n'/	..foo foo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1258/(?'a1'foo) \k'a1'/	..foo foo..	yM	$+{a1}	foo	miniperl cannot load Tie::Hash::NamedCapture
1259/(?<a1>foo) \k<a1>/	..foo foo..	yM	$+{a1}	foo	miniperl cannot load Tie::Hash::NamedCapture
1260/(?'_'foo) \k'_'/	..foo foo..	yM	$+{_}	foo	miniperl cannot load Tie::Hash::NamedCapture
1261/(?<_>foo) \k<_>/	..foo foo..	yM	$+{_}	foo	miniperl cannot load Tie::Hash::NamedCapture
1262/(?'_0_'foo) \k'_0_'/	..foo foo..	yM	$+{_0_}	foo	miniperl cannot load Tie::Hash::NamedCapture
1263/(?<_0_>foo) \k<_0_>/	..foo foo..	yM	$+{_0_}	foo	miniperl cannot load Tie::Hash::NamedCapture
1264/(?'0'foo) bar/	..foo bar..	c	-	Sequence (?'
1265/(?<0>foo) bar/	..foo bar..	c	-	Sequence (?<
1266/(?'12'foo) bar/	..foo bar..	c	-	Sequence (?'
1267/(?<12>foo) bar/	..foo bar..	c	-	Sequence (?<
1268/(?'1a'foo) bar/	..foo bar..	c	-	Sequence (?'
1269/(?<1a>foo) bar/	..foo bar..	c	-	Sequence (?<
1270/(?''foo) bar/	..foo bar..	c	-	Sequence (?''
1271/(?<>foo) bar/	..foo bar..	c	-	Sequence (?<>
1272/foo \k'n'/	foo foo	c	-	Reference to nonexistent named group
1273/foo \k<n>/	foo foo	c	-	Reference to nonexistent named group
1274/foo \k'a1'/	foo foo	c	-	Reference to nonexistent named group
1275/foo \k<a1>/	foo foo	c	-	Reference to nonexistent named group
1276/foo \k'_'/	foo foo	c	-	Reference to nonexistent named group
1277/foo \k<_>/	foo foo	c	-	Reference to nonexistent named group
1278/foo \k'_0_'/	foo foo	c	-	Reference to nonexistent named group
1279/foo \k<_0_>/	foo foo	c	-	Reference to nonexistent named group
1280/foo \k'0'/	foo foo	c	-	Sequence \\k'
1281/foo \k<0>/	foo foo	c	-	Sequence \\k<
1282/foo \k'12'/	foo foo	c	-	Sequence \\k'
1283/foo \k<12>/	foo foo	c	-	Sequence \\k<
1284/foo \k'1a'/	foo foo	c	-	Sequence \\k'
1285/foo \k<1a>/	foo foo	c	-	Sequence \\k<
1286/foo \k''/	foo foo	c	-	Sequence \\k'
1287/foo \k<>/	foo foo	c	-	Sequence \\k<
1288/(?<as>as) (\w+) \k<as> (\w+)/	as easy as pie	y	$1-$2-$3	as-easy-pie
1289
1290# \g{...} with a name as the argument
1291/(?'n'foo) \g{n}/	..foo foo..	y	$1	foo
1292/(?'n'foo) \g{n}/	..foo foo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1293/(?<n>foo) \g{n}/	..foo foo..	y	$1	foo
1294/(?<n>foo) \g{n}/	..foo foo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1295/(?<as>as) (\w+) \g{as} (\w+)/	as easy as pie	y	$1-$2-$3	as-easy-pie
1296
1297# Python style named capture buffer stuff
1298/(?P<n>foo)(?P=n)/	..foofoo..	y	$1	foo
1299/(?P<n>foo)(?P=n)/	..foofoo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1300/(?:(?P<n>foo)|(?P<n>bar))(?P=n)/	..barbar..	yM	$+{n}	bar	miniperl cannot load Tie::Hash::NamedCapture
1301/^(?P<PAL>(?P<CHAR>.)((?P>PAL)|.?)(?P=CHAR))$/	madamimadam	y	$&	madamimadam
1302/^(?P<PAL>(?P<CHAR>.)((?P>PAL)|.?)(?P=CHAR))$/	madamiamadam	n	-	-
1303/(?P<n>foo) (?P=n)/	..foo foo..	y	$1	foo
1304/(?P<n>foo) (?P=n)/	..foo foo..	yM	$+{n}	foo	miniperl cannot load Tie::Hash::NamedCapture
1305/(?P<as>as) (\w+) (?P=as) (\w+)/	as easy as pie	y	$1-$2-$3	as-easy-pie
1306
1307#check that non identifiers as names are treated as the appropriate lookaround
1308(?<=bar>)foo	bar>foo	y	$&	foo
1309(?<!bar>)foo	bar>foo	n	-	-
1310(?<=bar>ABC)foo	bar>ABCfoo	y	$&	foo
1311(?<!bar>ABC)foo	bar>ABCfoo	n	-	-
1312(?<bar>)foo	bar>ABCfoo	y	$&	foo
1313(?<bar>ABC)foo	bar>ABCfoo	y	$&	ABCfoo
1314
1315(?<=abcd(?<=(aaaabcd)))	..aaaabcd..	y	$1	aaaabcd
1316(?=xy(?<=(aaxy)))	..aaxy..	y	$1	aaxy
1317
1318X(\w+)(?=\s)|X(\w+)	Xab	y	[$1-$2]	[-ab]
1319
1320#check that branch reset works ok.
1321(?|(a))	a	y	$1-$+-$^N	a-a-a
1322(?|a(.)b|d(.(o).)d|i(.)(.)j)(.)	d!o!da	y	$1-$2-$3	!o!-o-a
1323(?|a(.)b|d(.(o).)d|i(.)(.)j)(.)	aabc	y	$1-$2-$3	a--c
1324(?|a(.)b|d(.(o).)d|i(.)(.)j)(.)	ixyjp	y	$1-$2-$3	x-y-p
1325(?|(?|(a)|(b))|(?|(c)|(d)))	a	y	$1	a
1326(?|(?|(a)|(b))|(?|(c)|(d)))	b	y	$1	b
1327(?|(?|(a)|(b))|(?|(c)|(d)))	c	y	$1	c
1328(?|(?|(a)|(b))|(?|(c)|(d)))	d	y	$1	d
1329(.)(?|(.)(.)x|(.)d)(.)	abcde	y	$1-$2-$3-$4-$5-	b-c--e--
1330(\N)(?|(\N)(\N)x|(\N)d)(\N)	abcde	y	$1-$2-$3-$4-$5-	b-c--e--
1331(?|(?<foo>x))	x	yM	$+{foo}	x	miniperl cannot load Tie::Hash::NamedCapture
1332(?|(?<foo>x)|(?<bar>y))	x	yM	$+{foo}	x	miniperl cannot load Tie::Hash::NamedCapture
1333(?|(?<bar>y)|(?<foo>x))	x	yM	$+{foo}	x	miniperl cannot load Tie::Hash::NamedCapture
1334(?<bar>)(?|(?<foo>x))	x	yM	$+{foo}	x	miniperl cannot load Tie::Hash::NamedCapture
1335# Used to crash, because the last branch was ignored when the parens
1336# were counted:
1337(?|(b)|()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()(a))	a	y	$&	a
1338
1339#Bug #41492
1340(?(DEFINE)(?<A>(?&B)+)(?<B>a))(?&A)	a	y	$&	a
1341(?(DEFINE)(?<A>(?&B)+)(?<B>a))(?&A)	aa	y	$&	aa
1342\x{100}?(??{""})xxx	xxx	y	$&	xxx
1343
1344foo(\R)bar	foo\r\nbar	y	$1	\r\n
1345foo(\R)bar	foo\nbar	y	$1	\n
1346foo(\R)bar	foo\rbar	y	$1	\r
1347
1348foo(\R+)bar	foo\r\n\x{85}\r\n\nbar	y	$1	\r\n\x{85}\r\n\n
1349(\V+)(\R)	foo\r\n\x{85}\r\n\nbar	y	$1-$2	foo-\r\n
1350(\R+)(\V)	foo\r\n\x{85}\r\n\nbar	y	$1-$2	\r\n\x{85}\r\n\n-b
1351foo(\R)bar	foo\x{85}bar	y	$1	\x{85}
1352(\V)(\R)	foo\x{85}bar	y	$1-$2	o-\x{85}
1353(\R)(\V)	foo\x{85}bar	y	$1-$2	\x{85}-b
1354foo(\R)bar	foo\r\nbar	y	$1	\r\n
1355(\V)(\R)	foo\r\nbar	y	$1-$2	o-\r\n
1356(\R)(\V)	foo\r\nbar	y	$1-$2	\r\n-b
1357foo(\R)bar	foo\r\nbar	y	$1	\r\n
1358(\V)(\R)	foo\r\nbar	y	$1-$2	o-\r\n
1359(\R)(\V)	foo\r\nbar	y	$1-$2	\r\n-b
1360foo(\R)bar	foo\rbar	y	$1	\r
1361(\V)(\R)	foo\rbar	y	$1-$2	o-\r
1362(\R)(\V)	foo\rbar	y	$1-$2	\r-b
1363
1364foo(\v+)bar	foo\r\n\x{85}\r\n\nbar	y	$1	\r\n\x{85}\r\n\n
1365(\V+)(\v)	foo\r\n\x{85}\r\n\nbar	y	$1-$2	foo-\r
1366(\v+)(\V)	foo\r\n\x{85}\r\n\nbar	y	$1-$2	\r\n\x{85}\r\n\n-b
1367foo(\v)bar	foo\x{85}bar	y	$1	\x{85}
1368(\V)(\v)	foo\x{85}bar	y	$1-$2	o-\x{85}
1369(\v)(\V)	foo\x{85}bar	y	$1-$2	\x{85}-b
1370foo(\v)bar	foo\rbar	y	$1	\r
1371(\V)(\v)	foo\rbar	y	$1-$2	o-\r
1372(\v)(\V)	foo\rbar	y	$1-$2	\r-b
1373
1374
1375foo(\h+)bar	foo\t\x{A0}bar	y	$1	\t\x{A0}
1376(\H+)(\h)	foo\t\x{A0}bar	y	$1-$2	foo-\t
1377(\h+)(\H)	foo\t\x{A0}bar	y	$1-$2	\t\x{A0}-b
1378foo(\h)bar	foo\x{A0}bar	y	$1	\x{A0}
1379(\H)(\h)	foo\x{A0}bar	y	$1-$2	o-\x{A0}
1380(\h)(\H)	foo\x{A0}bar	y	$1-$2	\x{A0}-b
1381foo(\h)bar	foo\tbar	y	$1	\t
1382(\H)(\h)	foo\tbar	y	$1-$2	o-\t
1383(\h)(\H)	foo\tbar	y	$1-$2	\t-b
1384
1385.*\z	foo\n	y	-$&-	--
1386\N*\z	foo\n	y	-$&-	--
1387.*\Z	foo\n	y	-$&-	-foo-
1388\N*\Z	foo\n	y	-$&-	-foo-
1389^(?:(\d)x)?\d$	1	y	${\(defined($1)?1:0)}	0
1390.*?(?:(\w)|(\w))x	abx	y	$1-$2	b-
1391
13920{50}	000000000000000000000000000000000000000000000000000	y	-	-
1393^a?(?=b)b	ab	y	$&	ab	# Bug #56690
1394^a*(?=b)b	ab	y	$&	ab	# Bug #56690
1395/>\d+$ \n/ix	>10\n	y	$&	>10
1396/>\d+$ \n/ix	>1\n	y	$&	>1
1397/\d+$ \n/ix	>10\n	y	$&	10
1398/>\d\d$ \n/ix	>10\n	y	$&	>10
1399/>\d+$ \n/x	>10\n	y	$&	>10
1400
1401# Two regressions in 5.8.x (only) introduced by change 30638
1402# Simplification of the test failure in XML::LibXML::Simple:
1403/^\s*i.*?o\s*$/s	io\n io	y	-	-
1404# As reported in #59168 by Father Chrysostomos:
1405/(.*?)a(?!(a+)b\2c)/	baaabaac	y	$&-$1	baa-ba
1406# [perl #60344] Regex lookbehind failure after an (if)then|else in perl 5.10
1407/\A(?(?=db2)db2|\D+)(?<!processed)\.csv\z/xms	sql_processed.csv	n	-	-
1408/\N{U+0100}/	\x{100}	y	$&	\x{100}	# Bug #59328
1409/[a\N{U+0100}]/	\x{100}	y	$&	\x{100}
1410/[a\N{U+0100}]/	a	y	$&	a
1411
1412# Verify that \N{U+...} forces Unicode semantics
1413/\N{U+41}\x{c1}/i	a\x{e1}	y	$&	a\x{e1}
1414/[\N{U+41}\x{c1}]/i	\x{e1}	y	$&	\x{e1}
1415
1416[\s][\S]	\x{a0}\x{a0}	n	-	-	# Unicode complements should not match same character
1417
1418# was generating malformed utf8
1419'[\x{100}\xff]'i	\x{ff}	y	$&	\x{ff}
1420
1421((??{ "(?:|)" }))\s	C\x20 	y	-	-
1422
1423# Verify that \ escapes the { after \N, and causes \N to match non-newline
1424abc\N\{U+BEEF}	abc\n{UBEEF}	n
1425abc\N\{U+BEEF}	abc.{UBEEF}	y	$&	abc.{UBEEF}
1426[abc\N\{U+BEEF}]	-	c	-	\\N in a character class must be a named character
1427
1428# Verify that \N can be trailing and causes \N to match non-newline
1429abc\N	abcd	y	$&	abcd
1430abc\N	abc\n	n
1431
1432# Verify get errors.  For these, we need // or else puts it in single quotes,
1433# and bypasses the lexer.
1434/\N{U+}/	-	c	-	Invalid hexadecimal number
1435# Below currently gives a misleading message
1436/[\N{U+}]/	-	c	-	Unmatched
1437/abc\N{def/	-	c	-	Missing right brace
1438/\N{U+4AG3}/	-	c	-	Illegal hexadecimal digit
1439/[\N{U+4AG3}]/	-	c	-	Illegal hexadecimal digit
1440
1441# And verify that in single quotes which bypasses the lexer, the regex compiler
1442# figures it out.
1443\N{U+}	-	c	-	Invalid hexadecimal number
1444[\N{U+}]	-	c	-	Invalid hexadecimal number
1445\N{U+4AG3}	-	c	-	Illegal hexadecimal digit
1446[\N{U+4AG3}]	-	c	-	Invalid hexadecimal number
1447abc\N{def	-	c	-	\\N{NAME} must be resolved by the lexer
1448
1449# Verify that under /x that still cant have space before left brace
1450/abc\N {U+41}/x	-	c	-	Missing braces
1451/abc\N {SPACE}/x	-	c	-	Missing braces
1452
1453# Verifies catches hex errors, and doesn't expose our . notation to the outside
1454/\N{U+0xBEEF}/	-	c	-	Illegal hexadecimal digit
1455/\N{U+BEEF.BEAD}/	-	c	-	Illegal hexadecimal digit
1456
1457# Verify works in single quotish context; regex compiler delivers slightly different msg
1458# \N{U+BEEF.BEAD} succeeds here, because can't completely hide it from the outside.
1459\N{U+0xBEEF}	-	c	-	Illegal hexadecimal digit
1460\c`	-	c	-	\"\\c`\" is more clearly written simply as \"\\ \"
1461\c1	-	c	-	\"\\c1\" is more clearly written simply as \"q\"
1462\cA	\001	y	$&	\1
1463
1464\400	\x{100}	y	$&	\x{100}
1465\600	\x{180}	y	$&	\x{180}
1466\777	\x{1FF}	y	$&	\x{1FF}
1467[a\400]	\x{100}	y	$&	\x{100}
1468[b\600]	\x{180}	y	$&	\x{180}
1469[c\777]	\x{1FF}	y	$&	\x{1FF}
1470\o{120}	\x{50}	y	$&	\x{50}
1471\o{400}	\x{100}	y	$&	\x{100}
1472\o{1000}	\x{200}	y	$&	\x{200}
1473[a\o{120}]	\x{50}	y	$&	\x{50}
1474[a\o{400}]	\x{100}	y	$&	\x{100}
1475[a\o{1000}]	\x{200}	y	$&	\x{200}
1476
1477# The below was inserting a NULL into the character class.
1478[\8\9]	\000	n	-	-
1479[\8\9]	8	y	$&	8
1480[\8\9]	9	y	$&	9
1481
1482# Verify that reads 1-3 octal digits, and that \_ works in char class
1483[\0]	\000	y	$&	\000
1484[\07]	\007	y	$&	\007
1485[\07]	7\000	n	-	-
1486[\006]	\006	y	$&	\006
1487[\006]	6\000	n	-	-
1488[\0005]	\0005	y	$&	\000
1489[\0005]	5\000	y	$&	5
1490[\_]	_	y	$&	_
1491
1492# RT #79152
1493(q1|.)*(q2|.)*(x(a|bc)*y){2,}	xayxay	y	$&	xayxay
1494(q1|.)*(q2|.)*(x(a|bc)*y){2,3}	xayxay	y	$&	xayxay
1495(q1|z)*(q2|z)*z{15}-.*?(x(a|bc)*y){2,3}Z	zzzzzzzzzzzzzzzz-xayxayxayxayZ	y	$&	zzzzzzzzzzzzzzzz-xayxayxayxayZ
1496
1497(?:(?:)foo|bar|zot|rt78356)	foo	y	$&	foo
1498/\xe0\pL/i	\xc0a	y	$&	\xc0a
1499
1500# RT #85528
1501(?{})[\x{100}]	\x{100}	y	$&	\x{100}
1502
1503# RT #85964
1504^m?(\S)(.*)\1$	aba	y	$1	a
1505^m?(\S)(.*)\1$	\tb\t	n	-	-
1506^m?(\s)(.*)\1$	\tb\t	y	$1	\t
1507^m?(\s)(.*)\1$	aba	n	-	-
1508^m?(\W)(.*)\1$	:b:	y	$1	:
1509^m?(\W)(.*)\1$	aba	n	-	-
1510^m?(\w)(.*)\1$	aba	y	$1	a
1511^m?(\w)(.*)\1$	:b:	n	-	-
1512^m?(\D)(.*)\1$	aba	y	$1	a
1513^m?(\D)(.*)\1$	5b5	n	-	-
1514^m?(\d)(.*)\1$	5b5	y	$1	5
1515^m?(\d)(.*)\1$	aba	n	-	-
1516
1517# 17F is 'Long s';  This makes sure the a's in /aa can be separate
1518/s/ai	\x{17F}	y	$&	\x{17F}
1519/s/aia	\x{17F}	n	-	-
1520/s/aia	S	y	$&	S
1521/(?aia:s)/	\x{17F}	n	-	-
1522/(?aia:s)/	S	y	$&	S
1523
1524# Normally 1E9E generates a multi-char fold, but not in inverted class;
1525# See [perl #89750].  This makes sure that the simple fold gets generated
1526# in that case, to DF.
1527/[^\x{1E9E}]/i	\x{DF}	n	-	-
1528
1529# RT #96354
1530/^.*\d\H/	X1	n	-	-
1531/^.*\d\V/	X1	n	-	-
1532
1533# \p{L_} was being misinterpreted as \p{L}.  L_ matches cased letters, which
1534# the ideograph below isn't, whereas it does match L
1535/^\p{L_}/	\x{3400}	n	-	-
1536/^\p{L}/	\x{3400}	y	$&	\x{3400}
1537
1538# RT #89774
1539/[s\xDF]/ui	\xDFs	ybT	$&	\xDFs
1540
1541# RT #99928
1542/^\R\x0A$/	\x0D\x0A	n	-	-
1543
1544/ff/i	\x{FB00}\x{FB01}	y	$&	\x{FB00}
1545/ff/i	\x{FB01}\x{FB00}	y	$&	\x{FB00}
1546/fi/i	\x{FB01}\x{FB00}	y	$&	\x{FB01}
1547/fi/i	\x{FB00}\x{FB01}	y	$&	\x{FB01}
1548
1549# These test that doesn't cut-off matching too soon in the string for
1550# multi-char folds
1551/ffiffl/i	abcdef\x{FB03}\x{FB04}	y	$&	\x{FB03}\x{FB04}
1552/\xdf\xdf/ui	abcdefssss	y	$&	ssss
1553
1554/st/i	\x{DF}\x{FB05}	y	$&	\x{FB05}
1555/ssst/i	\x{DF}\x{FB05}	y	$&	\x{DF}\x{FB05}
1556
1557# [perl #101970]
1558/[[:lower:]]/i	\x{100}	y	$&	\x{100}
1559/[[:upper:]]/i	\x{101}	y	$&	\x{101}
1560
1561# Was matching 'ss' only and failing the entire match, not seeing the
1562# alternative that would succeed
1563/s\xDF/ui	\xDFs	y	$&	\xDFs
1564/sst/ui	s\N{LATIN SMALL LIGATURE ST}	y	$&	s\N{LATIN SMALL LIGATURE ST}
1565/sst/ui	s\N{LATIN SMALL LIGATURE LONG S T}	y	$&	s\N{LATIN SMALL LIGATURE LONG S T}
1566
1567# /i properties shouldn't match more than the property itself
1568/[[:ascii:]]/i	\N{KELVIN SIGN}	n	-	-
1569
1570# [[:lower:]]/i and [[:upper:]]/i should match what \p{Lower} and \p{Upper} do.
1571# which is \p{Cased}, not \p{Alpha},
1572/[[:lower:]]/i	\N{U+3400}	n	-	-
1573/[[:upper:]]/i	\N{U+01BB}	n	-	-
1574
1575# [perl #110648]
1576[^\p{Alphabetic}]	\x{100}	n	-	-
1577
1578# [perl #111400].  Tests the first Y/N boundary above 255 for each of these.
1579/[[:alnum:]]/	\x{2c1}	y	-	-
1580/[[:alnum:]]/	\x{2c2}	n	-	-
1581/[[:alpha:]]/	\x{2c1}	y	-	-
1582/[[:alpha:]]/	\x{2c2}	n	-	-
1583/[[:graph:]]/	\x{377}	y	-	-
1584/[[:graph:]]/	\x{378}	n	-	-
1585/[[:lower:]]/	\x{100}	n	-	-
1586/[[:lower:]]/	\x{101}	y	-	-
1587/[[:lower:]]/	\x{102}	n	-	-
1588/[[:print:]]/	\x{377}	y	-	-
1589/[[:print:]]/	\x{378}	n	-	-
1590/[[:punct:]]/	\x{37D}	n	-	-
1591/[[:punct:]]/	\x{37E}	y	-	-
1592/[[:punct:]]/	\x{388}	n	-	-
1593/[[:upper:]]/	\x{100}	y	-	-
1594/[[:upper:]]/	\x{101}	n	-	-
1595/[[:word:]]/	\x{2c1}	y	-	-
1596/[[:word:]]/	\x{2c2}	n	-	-
1597
1598# [perl #114220]
1599/[\h]/	\x{A0}	y	$&	\xA0
1600/[\H]/	\x{BF}	y	$&	\xBF
1601/[\H]/	\x{A0}	n	-	-
1602/[\H]/	\x{A1}	y	$&	\xA1
1603
1604
1605# vim: softtabstop=0 noexpandtab
1606