nicht angemeldet
hi,
hätte diesen vorschlag:
#zum schreiben
open (OUTF, ">>$file") or die $!;
print OUTF $data;
close (OUTF);
#zum lesen
open (INF, "<$file") or die $!;
@lines = <INF>;
close (INF);
#ausgabe von unten nach oben
for ($i=$#lines; i>=0; $i--) {
print $lines[$i];
}
die methode hat den vorteil, dass das file $file bei gleichzeitigem zugriff nicht gelöscht wird und man sich einen filelock erspart.
lg, lois
Hallo zusammen!
Ich bin gerade dabei mich auf dem Gebiet Perl ein wenig vorzuarbeiten und habe ein kleines Script geschrieben, das Eingaben in eine Textdatei schreibt ...und ich bin stolz drauf!! :-)
Nun schreibt er aber jeden neuen Eintrag unter die anderen und ich hätte es gerne so, dass der neue Eintrag über die anderen Einträge geschrieben wird.
Kann mir jemand sagen, wie ich das hinkriege?
Danke!!