Hello,

If it's just a small file you could load every line into an array and reverse the array :

open FFF, "< toctoc.txt " ;
my @slurp = (<FFF>) ;
print reverse @slurp ;
[download]

You can treat each line with a foreach over the array, but it may not fit your need if you really want to read one line at a time from the original file.

ZlR