Función readline de Perl

Descripción

Esta función lee una línea del identificador de archivo al que hace referencia EXPR y devuelve el resultado. Si desea utilizar un FILEHANDLE directamente, debe pasarlo como typeglob.

Simplemente, la función readline es equivalente a <>.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

readline EXPR

Valor devuelto

Esta función devuelve solo una línea en un contexto escalar y en un contexto de lista, se devuelve una lista de la línea hasta el final del archivo

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/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);

Cuando se ejecuta el código anterior, produce el siguiente resultado:

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