Ihre Syntax ist etwas aus veraltet (danke, Seth):
Sie müssen die Datei vollständig durchlaufen und die gewünschten Daten vor dem vorhandenen Dateiinhalt ausgeben:
%Vor%(unentgeltlich aus den Perl FAQ gestohlen, dann modifiziert)
Dadurch wird die Datei Zeile für Zeile verarbeitet, so dass Sie bei großen Dateien nicht unnötig viel Arbeitsspeicher verbrauchen. Aber es ist nicht sehr schnell.
Ich hoffe, das hilft.
Das Anhängen an die Spitze wird normalerweise als Vorabschaltung bezeichnet.
%Vor%Öffnen Sie alternativ data.txt- zum Schreiben und verschieben Sie dann data.txt nach dem Schließen in data.txt, was den Vorteil hat, atomar zu sein, so dass Unterbrechungen die Datei data.txt nicht kürzen können.
perl -ni -e 'print "Titel \ n" $. == 1' Dateiname, drucke die Antwort einmal