Lectura de Datos

El operador <STDIN> nos permite leer desde la entrada estándar. Cuando se usa en un contexto escalar, Perl lee de la entrada estándar hasta (e incluyendo) el siguiente retorno de carro.

Asi en:

$line = <STDIN>;

La variable $line contiene el retorno de carro leído. Es por eso que se usa el operador chomp el cual elimina el retorno de carro final:

$line = <STDIN>; # "hola\n"
chomp($line);    # $line contiene ahora "hola"

Si la línea termina en varios retornos de carro, chomp sólo elimina uno, si no hay no hace nada.

Cuando se alcanza el final del fichero, la lectura devuelve el valor especial undef.

En general un fichero se abre mediante la función open :

lhp@nereida:~/Lperl/src$ perl -wde 0
main::(-e:1):   0
DB<1> open $F, "> /tmp/file.txt" # apertura en modo escritura
DB<2> print $F "hello world\n"
DB<3> close($F)
DB<4> open $F, "/tmp/file.txt" # apertura en modo lectura
DB<5> $x = <$F>
DB<6> print $x
hello world