my @file = reverse(<FILE>);
foreach(@file) {
     #do something with $_;
}