$key .= ':001' if defined $hash{$key};
$key++ while defined $hash{$key};