Thx for your reply! My ISP does not have the File::ReadBackwards): Installed. Tried, but do not have the permisssions to copy it in the perl folder. I have hacked the code every which way, even resorted to

open(FILE,"$filename");
@lines = <FILE>;
close(FILE);

@lines = reverse sort(@lines);
[download]

preceeding my origninal code. Oddly, while some text is printed to the output filename2, I is weirdly done, prints some lines in the correct order but does not strickly follow the test for split directive. Any ideas? thx mike @lines = reverse sort(@lines);