sub util_remove_duplicates { @{$_[0]} = keys %{ { map{$_=>1} @{$_[0]} } }; return; }