my $last_line = (<FILE>)[-1];