my %seen; my @unique = grep !$seen{$_}++, map "$_", @objects;