perl -l12e 'print(chr(0x03c0))' -C
    perl -l12e 'print(pack("U0W*", 0xCF, 0x80))' -C