s/(....)/chr(hex($1))/ge # convert 0x7700 -> ç\234\200