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