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

##</code><code>##

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