{
  local ($,, $\) = (":", "\n");
  print unpack 'A2A5A3A3A2', 'A3xyz45M98AB7Z9';
}