$_++ while exists $hash{$_};
  $hash{$_}++;