perl -e 'use encoding "utf8", STDOUT => undef; print(pack("n", 204))'