Select Code to Download

my %unique  = map {; "$_" => 1 } @objects;

my %unique  = map { $_ => 1 } @objects;

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