PERL - Parcours d'un fichier texte

Programme qui permet d'ouvrir un fichier et d'imprimer à l'écran le contenu de celui-ci.

# Création d'une liste de fichiers
@FICHIERS = ( "fhcjt.TXT" );

#Parcours du fichier
foreach $Fichier (@FICHIERS)
{ print $Fichier;
}