perl -le 'print unpack("H*",pack("H*",1))'

perl -le 'print unpack("H*",pack("H*"," 1"))'

perl -le 'print unpack("H*",pack("H*","01"))'

##</code><code>##

perl -le 'print unpack("h*",pack("H*","1"))'