Lectura

En la línea 4 (while (defined($_ = <STDIN>)) almacenamos en la variable mágica $_ una línea que es leída desde la entrada estándar. El bucle se ejecuta mientras la condición sea cierta: mientras haya líneas en el fichero. Cuando se alcanza el final del fichero, se devuelve undef y por tanto se termina el bucle.

Casiano Rodríguez León
Licencia de Creative Commons
Principios de Programación Imperativa, Funcional y Orientada a Objetos Una Introducción en Perl/Una Introducción a Perl
por Casiano Rodríguez León is licensed under a Creative Commons Reconocimiento 3.0 Unported License.

Permissions beyond the scope of this license may be available at http://campusvirtual.ull.es/ocw/course/view.php?id=43.
2012-06-19