$hex = "Erik";
$hex = unpack("H*", $hex);   # = Hexadezimal
$hex =~ s/([a-fA-F0-9]{2})/pack("C", hex($1))/eg; # ... und wieder zurück