El separador de lectura

La variable especial $/ contiene el separador de lectura, que por defecto es un \n. Asi, si le asignamos $/ = '.'; en la siguiente lectura se leerá hasta el próximo punto o hasta el final del fichero si no lo hubiera. Asignarle a $/ la cadena vacía "" hace que se lea hasta el siguiente párrafo (esto es, hasta la siguiente aparición de dos o más líneas en blanco). Cuando tiene el valor undef se leerá todo el resto del fichero.

undef $/;
$x = <FILE>; # Ahora $x contiene todo el fichero

Ejercicio 2.5.1   Muerte Prematura:

Considere el siguiente código:

open FILEHANDLE, shift;
while (<FILEHANDLE>) {
  print;
}

¿Existe el riesgo de ``muerte'' prematura debido a que una línea contenga sólamente "0"? Pruebe con varios posibles ficheros de entrada. Observe que el operador de lectura <FILEHANDLE> incluye el retorno de carro \n en \$_.