perl -Mencoding=utf8 -e 'binmode STDOUT, ":bytes" or die $!;
    print(pack("n", 204))'