$string =~ s/$_/$hash{$_}/g for (keys %hash);