# New Ticket Created by Brent Laabs
# Please include the string: [perl #128868]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=128868 >
labster m: say "\x[0e53]".succ eq "\x[0e53]"
camelia rakudo-moar 77724b: OUTPUT«True»
labster m: say "\x[0e53] ", uniname("\x[0e53]");
camelia rakudo-moar 77724b: OUTPUT«๓ THAI DIGIT THREE»
masak labster: ...so three follows on three?
labster m: say "\x[0e54] ", uniname("\x[0e54]"); # Usually four
follows three
camelia rakudo-moar 77724b: OUTPUT«๔ THAI DIGIT FOUR»
labster m: say "\x[0e53]" ~~ /\d/;
camelia rakudo-moar 77724b: OUTPUT«「๓」»