If you want a quick and dirty hack and your OS supports
the "tail" command, try the following

    print system('tail -1 the_file_you_want_last_line_from');
[download]

There may be other more elegant perl ways but this works!!