$var=join(' ',map{sprintf('%02X',$_)}unpack('C*', $var));