$key= new Win32::TieRegistry "LMachine\\Software\\",
  { Access=>KEY_READ(), Delimiter=>"\\" };