foreach (@kmlFile)
     {
     if (m/<name>(.*)<\/name>/)
          {
          %{$1} = (name => "<name>$1</name");
          }
     }