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