Lire un fichier à l'envers

Charger le contenu dans un fichier dans un tableau (utiliser la module DB_File si le fichier est très gros), puis utiliser la fonction reverse :

#!/usr/local/bin/perl

use strict;

my @tab = <STDIN>;

foreach my $tmp (reverse(@tab))
{
	print $tmp;
}