my @line_fields = split " ", $line;
my $penultimate = $line_fields[-2];
my $last = $line_fields[-1];