my %seen;
my @unique = map !$seen{$_}++ ? "$_" : (), @objects;