my %seen; undef @seen{@data}; @data = keys %seen; undef %seen;