Ein Wort in einer Zeichenkette ersetzten

[x-VieW]

Hi Alexander

Danke für deine Bemühungen, aber ich habe mehrere Benutzer und
Passwörte in der Liste.
Wenn ich so schreiben, dann löscht mir die anderen Benutzer :(

open(FHD,">$file") or die "Can't open $file: $!\n";
print FHD @lines;
close (FHD);

Gruss
x-VieW