perl -e 'printf "%s\n", pack("H*", "0x58")'