my $last_line;
$last_line = $_ while < FH >;
parse( $last_line );