fügen Sie einen text am Anfang der Datei
Möchte ich hinzufügen, dass ein text auf der Spitze meiner data.txt Datei, diesen code fügen Sie den text am Ende der Datei. wie kann ich diesen code ändern, um den text zu schreiben auf der Spitze meiner data.txt Datei. vielen Dank im Voraus für jegliche Hilfe.
open (MYFILE, '>>data.txt');
print MYFILE "Title\n";
close (MYFILE)
Du musst angemeldet sein, um einen Kommentar abzugeben.
Ihre syntax ist
etwas offveraltet (danke, Seth):Haben Sie, um einen vollständigen Durchlauf durch die Datei, und schreiben Sie die gewünschten Daten, bevor Sie die vorhandene Datei Inhalt:
(unentgeltlich gestohlen, von dem Perl-FAQ, dann modifiziert)
Diesem Prozess wird die Datei Zeile für Zeile so, dass Sie auf große Dateien, die Sie nicht kauen bis eine Tonne von Speicher. Aber, es ist nicht gerade schnell.
Hoffe, das hilft.
Gibt es eine viel einfachere one-liner vorangestellt wird, einen block von text zu jeder Datei. Lassen Sie uns sagen, Sie haben eine Reihe von Dateien namens body1, body2, body3, etc, auf die Sie voranstellen möchten, einen block von text in eine Datei namens header:
Anfügen an die Spitze ist in der Regel als voranstellen.
Abwechselnd öffnen data.txt - für das schreiben und die dann verschieben data.txt - zu data.txt nach dem schließen, das hat den Vorteil, atomic, so dass Unterbrechungen nicht verlassen data.txt Datei abgeschnitten.
Sehen die Perl-FAQ-Eintrag zu diesem Thema
perl -ni -e 'print "Title\n" $.==1' mit dem Namen , diese drucken Sie die Antwort einmal