Fonction readline Perl

La description

Cette fonction lit une ligne du descripteur de fichier référencé par EXPR, retournant le résultat. Si vous souhaitez utiliser directement un FILEHANDLE, il doit être passé en tant que typeglob.

La fonction readline équivaut simplement à <>.

Syntaxe

Voici la syntaxe simple de cette fonction -

readline EXPR

Valeur de retour

Cette fonction ne renvoie qu'une seule ligne dans un contexte scalaire et dans un contexte de liste, une liste de ligne jusqu'à la fin de fichier est retournée

Exemple

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

#!/usr/bin/perl -w

my($buffer) = "";
open(FILE, "/etc/services") or
   die("Error reading file, stopped");

$buffer = <FILE>;
print("$buffer");

$buffer = readline( *FILE );
print("$buffer");

close(FILE);

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

# /etc/services:
# $Id: services,v 1.33 2003/03/14 16:41:47 notting Exp $