perl -e '%_=((join "",map chr ($_&0xff),0..0x1ff), "wert"); print keys %_' | hexdump