use strict;
use warnings;

my @array  = ("abc","def","abc","ghi","ghi","abc","jklm","abc","def");
my %hash   = map { $_ => 1 } @array;
my @unique = keys %hash;