($newvalue = $value) =~ s/(.)/sprintf('%02x,', ord($1))/ge;
chop($newvalue);