/\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 / End of testinput5 /