# for example
my %counts;

# count how many of each value you see.
$counts{$_}++ foreach (@array);

# Pull out only the ones you've seen exactly one of.
my @uniques = grep {$counts{$_} == 1} keys %counts;