$ perl -e 'print substr("a\x{2322}bcd", 0, 3), "\n";' | hexdump
00000000  61 e2 8c a2 62 0a