Thread Perl hängt sich mal wieder auf: bei ersetzen in einem Template
(7 answers)
Opened by pktm at 2003-10-18 20:25
du liest die datei ein:
my $filecontent; open(DATEI, "meinedatei.txt") || die "Konnte Datei meinedatei.txt nicht öffnen: $!"; { local $/; $filecontetn = <DATEI>; } close(DATEI); und dann hast du deinen hash mit den keyword => wert zuordnungen und ersetzt entsprechend. ich nehme als platzhalter in dateien gerne &{name} $filecontent =~ s/&\{([^\}]+)\}/exist $replace{$1} ? $replace{$1} : ""/egs; wie strat es schon mal postete. das sollte reichen. ist jetzt ungetestet, aber mit etwas glück klappts auf anhieb ;) |