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
2009-10-04