Práctica: Fichero en Orden Inverso

Escriba un programa que lea un fichero e imprima las líneas en orden inverso.

La siguiente sesión con el debuger sugiere una solución:

pp2@nereida:/tmp$ perl -wde 0
main::(-e:1):   0
  DB<1> open $F, "prueba.txt" # Abrimos fichero
  DB<2> @a = <$F> # Leemos el fichero en un contexto de lista
  DB<3> x @a      # Que hay en @a?
0  1
1  2
2  3
3  4
4  5
5  6
6  7

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