The Implementation
my
$ascii_char
=
'[\x00-\x7F]'
;
my
$cont_byte
=
'[\x80-\xBF]'
;