$ perl -e " use bytes; print chr(999) " τ