Fonction Perl eof

La description

Cette fonction renvoie 1 si la prochaine lecture sur FILEHANDLE renverra la fin du fichier, ou si FILEHANDLE n'est pas ouvert.

Un eof sans argument utilise le dernier fichier lu. Utiliser eof () avec des parenthèses vides est très différent. Il fait référence au pseudo fichier formé à partir des fichiers répertoriés sur la ligne de commande et accessible via l'opérateur <>.

Syntaxe

Voici la syntaxe simple de cette fonction -

eof FILEHANDLE

eof()

eof

Valeur de retour

Cette fonction renvoie undef si FILEHANDLE n'est pas à la fin du fichier et 1 si FILEHANDLE indiquera la fin du fichier lors de la prochaine lecture.

Exemple

Voici l'exemple de code montrant son utilisation de base -

# insert dashes just before last line of last file
while (<>) {
   if (eof()) {	# check for end of last file
      print "--------------\n";
   }
   print;
   last if eof();  # needed if we're reading from a terminal
}