Select Code to Download

print hex(c030), "\n";  # prints "49200"

$aschex.=uc(sprintf("%02x",ord($rawhex)));