perl -C -Mutf8 -e"print qq(\x{83})" >d.txt