Hallo,
Gibt es in Perl eine Möglichkeit, eine Reihe von Wortersetzungen
auf einmal durchführen zu lassen. Ich stelle mir da verschiedene
Wertepaare (von/nach) in einem Array vor, das für eine Massenersetzung auf einmal angewendet wird.
Thomas
wie wärs damit:
my $urtext=„This is my text.“;
my %woerter=(„This“ => „Dies“, „is“ => „ist“, „my“ => „mein“, „text“ => „Text“);
foreach $key (keys %woerter) {$urtext =~ s/$key/$woerter{$key}/g;}
print „$urtext\n“;
Vielen Dank Markus,
ich war mir nur nicht sicher, ob es etwas gibt, dass das Skalar nur einmal abloopt. Aber im Endeffekt ist es wohl egal ob es Perl intern gemacht wird oder ob man selbst ein paar mal drübergeht.
Danke, Du hast mir weitergeholfen,
Thomas
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]