$string =~ s/$_/$table{$_}/g for keys %table;