Il existe plusieurs façons pour ouvrir un fichier, le plus connu étant sans doute :
open(OUT,">file") or die $!; # faire quelques chose avec le FD OUT close(OUT) or warn $!;
Le > indique que l'on veut créer le fichier ou écraser le fichier courant si celui-ci existe déjà. On peut également utiliser <, » et | qui ont la même signification que les redirections du shell.
Les programmeurs systèmes pourront trouver également cette façon de faire :
#!/usr/bin/perl
use strict;
use FileHandle;
my $fd = FileHandle -> new("fichier",O_RDONLY) or die $!;
# agir avec $fd
$fd -> close() or warn $!;
L'avantage de la seconde solution est de donner la possibilité de maitriser mieux les flags d'ouverture du fichier. Il est cependant possible de remplacer ces flags pour une description plus simple :
my $fd = FileHandle -> new("fichier","r") or die $!;
Où "r" signifie en lecture seulement, on peut alors utiliser tous les flags habituels de la fonction système fopen(3) :
On peut trouver plus d'information sur l'ouverture des fichier avec Perl et sur systèmes Unix dans les man suivant :
On peut également étudier la documentation de Perl :