This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl 4.0 patch 9: patch #4, continued
[perl5.git] / t / op / re_tests
CommitLineData
378cc40b
LW
1abc abc y $& abc
2abc xbc n - -
3abc axc n - -
4abc abx n - -
5abc xabcy y $& abc
6abc ababc y $& abc
7ab*c abc y $& abc
8ab*bc abc y $& abc
9ab*bc abbc y $& abbc
10ab*bc abbbbc y $& abbbbc
a687059c 11ab{0,}bc abbbbc y $& abbbbc
378cc40b
LW
12ab+bc abbc y $& abbc
13ab+bc abc n - -
14ab+bc abq n - -
a687059c 15ab{1,}bc abq n - -
378cc40b 16ab+bc abbbbc y $& abbbbc
a687059c
LW
17ab{1,}bc abbbbc y $& abbbbc
18ab{1,3}bc abbbbc y $& abbbbc
19ab{3,4}bc abbbbc y $& abbbbc
20ab{4,5}bc abbbbc n - -
378cc40b
LW
21ab?bc abbc y $& abbc
22ab?bc abc y $& abc
a687059c 23ab{0,1}bc abc y $& abc
378cc40b
LW
24ab?bc abbbbc n - -
25ab?c abc y $& abc
a687059c 26ab{0,1}c abc y $& abc
378cc40b
LW
27^abc$ abc y $& abc
28^abc$ abcc n - -
29^abc abcc y $& abc
30^abc$ aabc n - -
31abc$ aabc y $& abc
32^ abc y $&
33$ abc y $&
34a.c abc y $& abc
35a.c axc y $& axc
36a.*c axyzc y $& axyzc
37a.*c axyzd n - -
38a[bc]d abc n - -
39a[bc]d abd y $& abd
40a[b-d]e abd n - -
41a[b-d]e ace y $& ace
42a[b-d] aac y $& ac
43a[-b] a- y $& a-
44a[b-] a- y $& a-
45a[b-a] - c - -
46a[]b - c - -
47a[ - c - -
48a] a] y $& a]
49a[]]b a]b y $& a]b
50a[^bc]d aed y $& aed
51a[^bc]d abd n - -
52a[^-b]c adc y $& adc
53a[^-b]c a-c n - -
54a[^]b]c a]c n - -
55a[^]b]c adc y $& adc
56ab|cd abc y $& ab
57ab|cd abcd y $& ab
58()ef def y $&-$1 ef-
59()* - c - -
60*a - c - -
61^* - c - -
62$* - c - -
63(*)b - c - -
64$b b n - -
65a\ - c - -
66a\(b a(b y $&-$1 a(b-
67a\(*b ab y $& ab
68a\(*b a((b y $& a((b
69a\\b a\b y $& a\b
70abc) - c - -
71(abc - c - -
72((a)) abc y $&-$1-$2 a-a-a
73(a)b(c) abc y $&-$1-$2 abc-a-c
74a+b+c aabbabc y $& abc
a687059c 75a{1,}b{1,}c aabbabc y $& abc
378cc40b
LW
76a** - c - -
77a*? - c - -
78(a*)* - c - -
79(a*)+ - c - -
80(a|)* - c - -
81(a*|b)* - c - -
82(a+|b)* ab y $&-$1 ab-b
a687059c 83(a+|b){0,} ab y $&-$1 ab-b
378cc40b 84(a+|b)+ ab y $&-$1 ab-b
a687059c 85(a+|b){1,} ab y $&-$1 ab-b
378cc40b 86(a+|b)? ab y $&-$1 a-a
a687059c 87(a+|b){0,1} ab y $&-$1 a-a
378cc40b
LW
88(^)* - c - -
89(ab|)* - c - -
90)( - c - -
91[^ab]* cde y $& cde
92abc n - -
93a* y $&
94([abc])*d abbbcd y $&-$1 abbbcd-c
95([abc])*bcd abcd y $&-$1 abcd-a
96a|b|c|d|e e y $& e
97(a|b|c|d|e)f ef y $&-$1 ef-e
98((a*|b))* - c - -
99abcd*efg abcdefg y $& abcdefg
100ab* xabyabbbz y $& ab
101ab* xayabbbz y $& a
102(ab|cd)e abcde y $&-$1 cde-cd
103[abhgefdc]ij hij y $& hij
104^(ab|cd)e abcde n x$1y xy
105(abc|)ef abcdef y $&-$1 ef-
106(a|b)c*d abcd y $&-$1 bcd-b
107(ab|ab*)bc abc y $&-$1 abc-a
108a([bc]*)c* abc y $&-$1 abc-bc
109a([bc]*)(c*d) abcd y $&-$1-$2 abcd-bc-d
110a([bc]+)(c*d) abcd y $&-$1-$2 abcd-bc-d
111a([bc]*)(c+d) abcd y $&-$1-$2 abcd-b-cd
112a[bcd]*dcdcde adcdcde y $& adcdcde
113a[bcd]+dcdcde adcdcde n - -
114(ab|a)b*c abc y $&-$1 abc-ab
115((a)(b)c)(d) abcd y $1-$2-$3-$4 abc-a-b-d
116[a-zA-Z_][a-zA-Z0-9_]* alpha y $& alpha
117^a(bc+|b[eh])g|.h$ abh y $&-$1 bh-
118(bc+d$|ef*g.|h?i(j|k)) effgz y $&-$1-$2 effgz-effgz-
119(bc+d$|ef*g.|h?i(j|k)) ij y $&-$1-$2 ij-ij-j
120(bc+d$|ef*g.|h?i(j|k)) effg n - -
121(bc+d$|ef*g.|h?i(j|k)) bcdd n - -
122(bc+d$|ef*g.|h?i(j|k)) reffgz y $&-$1-$2 effgz-effgz-
fe14fcc3
LW
123((((((((((a)))))))))) a y $10 a
124((((((((((a))))))))))\10 aa y $& aa
125((((((((((a))))))))))\41 aa n - -
126((((((((((a))))))))))\41 a! y $& a!
378cc40b
LW
127(((((((((a))))))))) a y $& a
128multiple words of text uh-uh n - -
129multiple words multiple words, yeah y $& multiple words
130(.*)c(.*) abcde y $&-$1-$2 abcde-ab-de
131\((.*), (.*)\) (a, b) y ($2, $1) (b, a)
132[k] ab n - -
133abcd abcd y $&-\$&-\\$& abcd-$&-\abcd
134a(bc)d abcd y $1-\$1-\\$1 bc-$1-\bc
135a[-]?c ac y $& ac
136(abc)\1 abcabc y $1 abc
137([a-c]*)\1 abcabc y $1 abc