my %seen;
my @unique = grep {not $seen{$_}++} <FILE>;
chomp @unique;