Thread Perl hängt sich mal wieder auf: bei ersetzen in einem Template (7 answers)
Opened by pktm at 2003-10-18 20:25

jan
 2003-10-18 20:31
#6293 #6293
User since
2003-08-04
2536 Artikel
ModeratorIn
[Homepage] [default_avatar]
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 ;)

View full thread Perl hängt sich mal wieder auf: bei ersetzen in einem Template