foreach (keys %known_files)
     {
          if(/announcements|links|news|info/i)
          {
                $top_level{$_} = $known_files{$_};
          }
     }