foreach (keys %seen) { .... }