/\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-\x{100}]/8Di

/[z\Qa-d]Ā\E]/8D
    \x{100}
    Ā 

/[\xFF]/D
    >\xff<

/[\xff]/D8
    >\x{ff}<

/[^\xFF]/D

/[^\xff]/8D

/ End of testinput5 /