Text mit Liste aus Wörten effizient vergleichen ?

[$xNeTworKx]

Hi,

while (($altes_wort, $neues_wort) = each(%Ersetzungen)) {
  $text =~ s/$altes_wort/$neues_wort/g;
}

Nun ja, aber so müsste ich erst wieder den Hash mit den Werten füttern. Ausserdem ersetze ich sowieso alle Übereinstimmungen mit dem gleichen Wort, aber der Ansatz hilft mir schon weiter, danke.

$xNeTworKx.