use Array::Unique; my @orig_array = ('11','54','23','78','54','54','78'); tie my @uniq, 'Array::Unique'; @uniq = @orig_array; print "@uniq";