/\x{100}/8DM /\x{1000}/8DM /\x{10000}/8DM /\x{100000}/8DM /\x{1000000}/8DM /\x{4000000}/8DM /\x{7fffFFFF}/8DM /[\x{ff}]/8DM /[\x{100}]/8DM /\x{ffffffff}/8 /\x{100000000}/8 /^\x{100}a\x{1234}/8 \x{100}a\x{1234}bcd /\x80/8D /\xff/8D /\x{0041}\x{2262}\x{0391}\x{002e}/D8 \x{0041}\x{2262}\x{0391}\x{002e} /\x{D55c}\x{ad6d}\x{C5B4}/D8 \x{D55c}\x{ad6d}\x{C5B4} /\x{65e5}\x{672c}\x{8a9e}/D8 \x{65e5}\x{672c}\x{8a9e} /\x{80}/D8 /\x{084}/D8 /\x{104}/D8 /\x{861}/D8 /\x{212ab}/D8 /.{3,5}X/D8 \x{212ab}\x{212ab}\x{212ab}\x{861}X /.{3,5}?/D8 \x{212ab}\x{212ab}\x{212ab}\x{861} /-- These tests are here rather than in testinput4 because Perl 5.6 has --/ /-- some problems with UTF-8 support, in the area of \x{..} where the --/ /-- value is < 255. It grumbles about invalid UTF-8 strings. --/ /^[a\x{c0}]b/8 \x{c0}b /^([a\x{c0}]*?)aa/8 a\x{c0}aaaa/ /^([a\x{c0}]*?)aa/8 a\x{c0}aaaa/ a\x{c0}a\x{c0}aaa/ /^([a\x{c0}]*)aa/8 a\x{c0}aaaa/ a\x{c0}a\x{c0}aaa/ /^([a\x{c0}]*)a\x{c0}/8 a\x{c0}aaaa/ a\x{c0}a\x{c0}aaa/ /-- --/ /(?<=\C)X/8 Should produce an error diagnostic /-- This one is here not because it's different to Perl, but because the --/ /-- way the captured single-byte is displayed. (In Perl it becomes a --/ /-- character, and you can't tell the difference.) --/ /X(\C)(.*)/8 X\x{1234} X\nabc /^[ab]/8D bar *** Failers c \x{ff} \x{100} /^[^ab]/8D c \x{ff} \x{100} *** Failers aaa /[^ab\xC0-\xF0]/8SD \x{f1} \x{bf} \x{100} \x{1000} *** Failers \x{c0} \x{f0} /Ā{3,4}/8SD \x{100}\x{100}\x{100}\x{100\x{100} /(\x{100}+|x)/8SD /(\x{100}*a|x)/8SD /(\x{100}{0,2}a|x)/8SD /(\x{100}{1,2}a|x)/8SD /\x{100}*(\d+|"(?1)")/8 1234 "1234" \x{100}1234 "\x{100}1234" \x{100}\x{100}12ab \x{100}\x{100}"12" *** Failers \x{100}\x{100}abcd /\x{100}/8D /\x{100}*/8D /a\x{100}*/8D /ab\x{100}*/8D /a\x{100}\x{101}*/8D /a\x{100}\x{101}+/8D /\x{100}*A/8D A /\x{100}*\d(?R)/8D /[^\x{c4}]/D /[^\x{c4}]/8D /[\x{100}]/8DM \x{100} Z\x{100} \x{100}Z *** Failers /[Z\x{100}]/8DM Z\x{100} \x{100} \x{100}Z *** Failers /[\x{200}-\x{100}]/8 /[Ā-Ą]/8 \x{100} \x{104} *** Failers \x{105} \x{ff} /[z-\x{100}]/8D /[z\Qa-d]Ā\E]/8D \x{100} Ā /[\xFF]/D >\xff< /[\xff]/D8 >\x{ff}< /[^\xFF]/D /[^\xff]/8D /[Ä-Ü]/8 Ö # Matches without Study \x{d6} /[Ä-Ü]/8S Ö <-- Same with Study \x{d6} /[\x{c4}-\x{dc}]/8 Ö # Matches without Study \x{d6} /[\x{c4}-\x{dc}]/8S Ö <-- Same with Study \x{d6} /[]/8 //8 /xxx/8 /xxx/8?D /abc/8 ] \? /anything/8 \xc0\x80 \xc1\x8f \xe0\x9f\x80 \xf0\x8f\x80\x80 \xf8\x87\x80\x80\x80 \xfc\x83\x80\x80\x80\x80 \xfe\x80\x80\x80\x80\x80 \xff\x80\x80\x80\x80\x80 \xc3\x8f \xe0\xaf\x80 \xe1\x80\x80 \xf0\x9f\x80\x80 \xf1\x8f\x80\x80 \xf8\x88\x80\x80\x80 \xf9\x87\x80\x80\x80 \xfc\x84\x80\x80\x80\x80 \xfd\x83\x80\x80\x80\x80 /\x{100}abc(xyz(?1))/8D /[^\x{100}]abc(xyz(?1))/8D /[ab\x{100}]abc(xyz(?1))/8D /(\x{100}(b(?2)c))?/D8 /(\x{100}(b(?2)c)){0,2}/D8 /(\x{100}(b(?1)c))?/D8 /(\x{100}(b(?1)c)){0,2}/D8 /\W/8 A.B A\x{100}B /\w/8 \x{100}X /a\x{1234}b/P8 a\x{1234}b /^\ሴ/8D /\777/I /\777/8I \x{1ff} \777 /\x{100}*\d/8D /\x{100}*\s/8D /\x{100}*\w/8D /\x{100}*\D/8D /\x{100}*\S/8D /\x{100}*\W/8D /\x{100}+\x{200}/8D /\x{100}+X/8D /X+\x{200}/8D /()()()()()()()()()() ()()()()()()()()()() ()()()()()()()()()() ()()()()()()()()()() A (x) (?41) B/8x AxxB /^[\x{100}\E-\Q\E\x{150}]/B8 /^[\QĀ\E-\QŐ\E]/B8 /^[\QĀ\E-\QŐ\E/B8 /^abc./mgx8 abc1 \x0aabc2 \x0babc3xx \x0cabc4 \x0dabc5xx \x0d\x0aabc6 \x{0085}abc7 \x{2028}abc8 \x{2029}abc9 JUNK /abc.$/mgx8 abc1\x0a abc2\x0b abc3\x0c abc4\x0d abc5\x0d\x0a abc6\x{0085} abc7\x{2028} abc8\x{2029} abc9 /^a\Rb/8 a\nb a\rb a\r\nb a\x0bb a\x0cb a\x{85}b a\x{2028}b a\x{2029}b ** Failers a\n\rb /^a\R*b/8 ab a\nb a\rb a\r\nb a\x0bb a\x0c\x{2028}\x{2029}b a\x{85}b a\n\rb a\n\r\x{85}\x0cb /^a\R+b/8 a\nb a\rb a\r\nb a\x0bb a\x0c\x{2028}\x{2029}b a\x{85}b a\n\rb a\n\r\x{85}\x0cb ** Failers ab /^a\R{1,3}b/8 a\nb a\n\rb a\n\r\x{85}b a\r\n\r\nb a\r\n\r\n\r\nb a\n\r\n\rb a\n\n\r\nb ** Failers a\n\n\n\rb a\r / End of testinput5 /