next up previous contents index practicapracticaPP2moodleLHPmoodlepserratacpanmodulospauseperlgoogleetsiiullpcgull
Sig: El separador de lectura Sup: Filehandles Ant: Errores al abrir un Err: Si hallas una errata ...

Lectura desde un fichero

Una vez que un fichero esta abierto para lectura, podemos leer las líneas de la misma forma que lo hacemos desde STDIN usando el operador de lectura <FILEHANDLE>. Veamos un ejemplo:

my $user = shift;
open PASSWD, "/etc/passwd" or die "Se esperaba un sistema Unix. $!";
while (<PASSWD>) {
  chomp;
  if (/^$user:/) { print "$_\n"; }
}


next up previous contents index practicapracticaPP2moodleLHPmoodlepserratacpanmodulospauseperlgoogleetsiiullpcgull
Sig: El separador de lectura Sup: Filehandles Ant: Errores al abrir un Err: Si hallas una errata ...
Casiano Rodríguez León
2006-02-21