$string =~ s/(.)/sprintf("%02x",ord($1))/egs; [download]
In reply to Re: Pack uneven length hex by james28909 in thread Pack uneven length hex by melez