Opened by alex74 at 2006-11-02 15:33
User since
2006-09-11
6 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-09-11
6 Artikel
BenutzerIn
Hallo,
ich habe folgendes Problem:
Ich möchte eine Textdatei durchgehen, und dabei bestimmte Ersetzungen vornehmen.
z.B. wenn <DATUM> gefunden wird, so soll dieser Platzhalter mit dem Rückgabewert der Subroutine &datum ersetzt werden, wenn <SPRING> gefunden wird, so soll mit dem Rückgabewert von &spring ersetzt werden etc.
Ich habe mir das wie folgt vorgestellt:
Dies funktioniert aber nicht. Wie könnte die Lösung aussehen?
Danke & Grüsse
Alex
ich habe folgendes Problem:
Ich möchte eine Textdatei durchgehen, und dabei bestimmte Ersetzungen vornehmen.
z.B. wenn <DATUM> gefunden wird, so soll dieser Platzhalter mit dem Rückgabewert der Subroutine &datum ersetzt werden, wenn <SPRING> gefunden wird, so soll mit dem Rückgabewert von &spring ersetzt werden etc.
Ich habe mir das wie folgt vorgestellt:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
use POSIX;
while (<INPUT>) {
$_ =~ s/<DATUM>/(?{ \&datum })/g;
}
sub datum {
my $jetzt = strftime ("%a %b %e %H:%M:%S%Y", gmtime);
return $jetzt;
}
Dies funktioniert aber nicht. Wie könnte die Lösung aussehen?
Danke & Grüsse
Alex