1 /-- This set of tests checks the API, internals, and non-Perl stuff for UTF-8
2 support, excluding Unicode properties. --/
33 /\x{0041}\x{2262}\x{0391}\x{002e}/DZ8
34 \x{0041}\x{2262}\x{0391}\x{002e}
36 /\x{D55c}\x{ad6d}\x{C5B4}/DZ8
37 \x{D55c}\x{ad6d}\x{C5B4}
39 /\x{65e5}\x{672c}\x{8a9e}/DZ8
40 \x{65e5}\x{672c}\x{8a9e}
53 \x{212ab}\x{212ab}\x{212ab}\x{861}X
57 \x{212ab}\x{212ab}\x{212ab}\x{861}
60 Should produce an error diagnostic
62 /-- This one is here not because it's different to Perl, but because the way
63 the captured single-byte is displayed. (In Perl it becomes a character, and you
64 can't tell the difference.) --/
94 \x{100}\x{100}\x{100}\x{100\x{100}
100 /(\x{100}{0,2}a|x)/8SDZ
102 /(\x{100}{1,2}a|x)/8SDZ
104 /\x{100}*(\d+|"(?1)")/8
122 /a\x{100}\x{101}*/8DZ
124 /a\x{100}\x{101}+/8DZ
173 Ö # Matches without Study
177 Ö <-- Same with Study
181 Ö # Matches without Study
185 Ö <-- Same with Study
208 \xfc\x83\x80\x80\x80\x80
209 \xfe\x80\x80\x80\x80\x80
210 \xff\x80\x80\x80\x80\x80
218 \xfc\x84\x80\x80\x80\x80
219 \xfd\x83\x80\x80\x80\x80
220 \?\xf8\x88\x80\x80\x80
221 \?\xf9\x87\x80\x80\x80
222 \?\xfc\x84\x80\x80\x80\x80
223 \?\xfd\x83\x80\x80\x80\x80
225 /\x{100}abc(xyz(?1))/8DZ
227 /[^\x{100}]abc(xyz(?1))/8DZ
229 /[ab\x{100}]abc(xyz(?1))/8DZ
231 /(\x{100}(b(?2)c))?/DZ8
233 /(\x{100}(b(?2)c)){0,2}/DZ8
235 /(\x{100}(b(?1)c))?/DZ8
237 /(\x{100}(b(?1)c)){0,2}/DZ8
275 /()()()()()()()()()()
282 /^[\x{100}\E-\Q\E\x{150}]/BZ8
289 abc1 \x0aabc2 \x0babc3xx \x0cabc4 \x0dabc5xx \x0d\x0aabc6 \x{0085}abc7 \x{2028}abc8 \x{2029}abc9 JUNK
292 abc1\x0a abc2\x0b abc3\x0c abc4\x0d abc5\x0d\x0a abc6\x{0085} abc7\x{2028} abc8\x{2029} abc9
294 /^a\Rb/8<bsr_unicode>
306 /^a\R*b/8<bsr_unicode>
312 a\x0c\x{2028}\x{2029}b
317 /^a\R+b/8<bsr_unicode>
322 a\x0c\x{2028}\x{2029}b
329 /^a\R{1,3}b/8<bsr_unicode>
348 \x09\x20\x{a0}X\x0a\x0b\x0c\x0d\x0a
349 \x09\x20\x{a0}\x0a\x0b\x0c\x0d\x0a
350 \x09\x20\x{a0}\x0a\x0b\x0c
352 \x09\x20\x{a0}\x0a\x0b
355 \x{3001}\x{3000}\x{2030}\x{2028}
361 \x{1680}\x{180e}\x{2007}X\x{2028}\x{2029}\x0c\x0d\x0a
362 \x09\x{205f}\x{a0}\x0a\x{2029}\x0c\x{2028}\x0a
363 \x09\x20\x{202f}\x0a\x0b\x0c
365 \x09\x{200a}\x{a0}\x{2028}\x0b
371 >\x{1680}\x{180e}\x{2000}\x{2003}\x{200a}\x{202f}\x{205f}\x{3000}<
382 /-- This tests the stricter UTF-8 check according to RFC 3629. --/
385 \x{0}\x{d7ff}\x{e000}\x{10ffff}
399 /a\Rb/I8<bsr_anycrlf>
407 /a\Rb/I8<bsr_unicode>
414 a\x{85}b\<bsr_anycrlf>
417 /a\R?b/I8<bsr_anycrlf>
425 /a\R?b/I8<bsr_unicode>
432 a\x{85}b\<bsr_anycrlf>
436 QQQ\x{2029}ABCaXYZ=!bPQR
465 /(*CRLF)(*UTF8)(*BSR_UNICODE)a\Rb/I
492 X\x{123}\x{123}\x{123}\P
493 X\x{123}\x{123}\x{123}\x{123}\P
499 X\x{123}\x{123}\x{123}\P
500 X\x{123}\x{123}\x{123}\x{123}\P
506 X\x{123}\x{123}\x{123}\P
507 X\x{123}\x{123}\x{123}\x{123}\P
513 X\x{123}\x{123}\x{123}x\P
514 X\x{123}\x{123}\x{123}\x{123}x\P
520 X\x{123}\x{123}\x{123}x\P
521 X\x{123}\x{123}\x{123}\x{123}x\P
527 X\x{123}\x{123}\x{123}x\P
528 X\x{123}\x{123}\x{123}\x{123}x\P
576 X\x{123}\x{123}\x{123}\P
577 X\x{123}\x{123}\x{123}\x{123}\P
583 X\x{123}\x{123}\x{123}\P
584 X\x{123}\x{123}\x{123}\x{123}\P
590 X\x{123}\x{123}\x{123}\P
591 X\x{123}\x{123}\x{123}\x{123}\P
614 /X[abc\x{123}]{2,4}b/8
618 X\x{123}\x{123}\x{123}\P
619 X\x{123}\x{123}\x{123}\x{123}\P
621 /X[abc\x{123}]{2,4}?b/8
625 X\x{123}\x{123}\x{123}\P
626 X\x{123}\x{123}\x{123}\x{123}\P
628 /X[abc\x{123}]{2,4}+b/8
632 X\x{123}\x{123}\x{123}\P
633 X\x{123}\x{123}\x{123}\x{123}\P
660 X\x{123}\x{123}\x{123}\P
661 X\x{123}\x{123}\x{123}\x{123}\P
667 X\x{123}\x{123}\x{123}\P
668 X\x{123}\x{123}\x{123}\x{123}\P
674 X\x{123}\x{123}\x{123}\P
675 X\x{123}\x{123}\x{123}\x{123}\P
698 /(\x{123})X\1{2,4}b/8
701 \x{123}X\x{123}\x{123}\P
702 \x{123}X\x{123}\x{123}\x{123}\P
703 \x{123}X\x{123}\x{123}\x{123}\x{123}\P
705 /(\x{123})X\1{2,4}?b/8
708 \x{123}X\x{123}\x{123}\P
709 \x{123}X\x{123}\x{123}\x{123}\P
710 \x{123}X\x{123}\x{123}\x{123}\x{123}\P
712 /(\x{123})X\1{2,4}+b/8
715 \x{123}X\x{123}\x{123}\P
716 \x{123}X\x{123}\x{123}\x{123}\P
717 \x{123}X\x{123}\x{123}\x{123}\x{123}\P
797 /-- End of testinput5 --/