in reply to Re^3: Read the last line in a text filein thread Read the last line in a text file
print do { my $l; $l = $_ while <FILE>; $l } [download]