print "here is last line:  $lines[ -1 ]";