[Perl] ASCII to HEX Converter