my %array_count;
foreach my $elem (@array) {
    $array_count{$elem}++;
}
foreach my $key (keys %array_count) {
    print "$key\n" if $array_count{$key} == 1;
}