Perl tutorial: Filehandling
 Files
Das folgende Perlprogramm liest ein File und gibt den Inhalt
des Files aus.
#!/usr/local/bin/perl
#
# Program to open the password file, read it in,
# print it, and close it again.
$file = '/etc/passwd'; # Filename zuweisen
open(INFO, $file); # File öffnen
@lines = <INFO>; # in Array einlesen
close(INFO); # File schliessen
print @lines; # Array ausgeben
Die Funktion open
öffnet ein File zum lesen. Der erste
Parameter ist ein Filehandle, welcher es erlaubt, das File
in Zukunft zu referenzieren. Der zweite Parameter ist ein Ausdruck,
der den Filenamen bezeichnet.
Die Funktion close schliesst das File.
Selbstverständlich möchten wir nicht nur Files lesen, sondern auch
schreiben oder etwas zu einem File hinzufügen können.
Die Verwendung des richtigen Prefix zum Filenamen der Funktion open
erlaubt diese Dinge:
open(INFO, $file); # Lesen
open(INFO, ">$file"); # Schreiben
open(INFO, ">>$file"); # Anhängen
open(INFO, "<$file"); # Lesen
Um etwas in ein geöffnetes File zu schreiben, verwenden wir die
Funktion print mit einem zusätzlichen Parameter,
dem Filehandle:
print INFO "This line goes to the file.\n";
Dieser Ausdruck schreibt in File mit Filehandle INFO obiger Text
zwischen Hochkommas. Beachte: Es darf kein Komma nach INFO stehen!
Zwecks besserer Lesbarkeit werden Filehandles mit Grossbuchstaben
bezeichnet.
Im obigen Programm wird ein File eingelesen. Der Filehandle ist INFO
und um es einzulesen verwendet man spitze Klammern. Der Ausdruck
@lines = <INFO>;
liest das File in den Array @lines. Beachte, dass das gesamte File auf's
Mal eingelesen wird. Der Grund liegt im Array-Kontext. Falls @lines
durch die skalare Variable $line ersetzt würde, würde nur eine Zeile
eingelesen und beim nächsten Aufruf die nächste. $line speichert
die ganze Zeile inklusive newline-character.
Die Filehandles STDIN, STDOUT und STDERR sind vordefiniert. Defaultmässig
schreibt print auf STDOUT und <> liest
von STDIN ( <> ist äquivalent zu <STDIN>).
Wir ändern das obige Programm, sodass das ganze File mit einem # Symbol
am Anfang jeder Zeile ausgegeben wird. Dazu sollte nur eine Zeile zum
Programm hinzugefügt und eine weitere geändert werden müssen.
Wir verwenden dazu die Spezialvariable
$".
Mit Files können unvorhergesehene Dinge geschehen, deshalb ist es
nützlich, die -w-Option zu verwenden, welche wir im
Abschnitt Ein Programm ausführen erwähnt
haben.
| 
