In diesem Tutorial werde ich euch erklären, wie man Datein mithilfe von Perl manipuliert.
#!/usr/bin/perl
open (DATA, "../path/daten.txt");
$inhalt = <DATA>;
close DATA;
print $inhalt."\n";
$text = "Hier steht der Text";
open (DATA, ">../path/daten.txt") || print STDERR "Datei konnte nicht geladen werden\n";
print DATA $text;
close (DATA);
Mit Hilfe von open() wird die datei "daten.txt" geladen und der inhalt in $inhalt gespeichert. Daraufhin die durch close() die Datei wieder geschlossen. Durch print wird die variable dann auf dem bildschirm ausgeben. Dann wird eine neue Varianle initialisiert ($text) In ihr steht der neue Inhalt für die Datei. Wir müssen ihn nur noch in die Datei schreiben. Dazu öffnen wir die Datei wieder mit open (), wobei wir diesmal den operator > der aussagt das in die datei geschrieben werden soll. nun schreiben wir mithilfe von print die variable $text in unsere Textdatei. Anschließend muss noch die Datei geschlossen werden