Did I get you right? The code should edit it "in place" and not return a new array? This works but looses any sorting you had:

sub util_remove_duplicates {
  my %hash;
  @hash{@{$_[0]}}=();
  @{$_[0]}=keys %hash;
}
[download]