Funzione readline di Perl

Descrizione

Questa funzione legge una riga dal filehandle a cui fa riferimento EXPR, restituendo il risultato. Se vuoi usare un FILEHANDLE direttamente, deve essere passato come typeglob.

La funzione semplicemente readline è equivalente a <>.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

readline EXPR

Valore di ritorno

Questa funzione restituisce solo una riga in un contesto scalare e in un contesto di elenco, viene restituito un elenco di righe fino alla fine del file

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di 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);

Quando viene eseguito il codice sopra, produce il seguente risultato:

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