# Perl gets told to decode the string from UTF-8
> perl -MEncode -wle print+length(decode('UTF-8',qq(\x{c3}\x{a4})))
1