From 8813311a44353afdb573577959ccf676b5318e47 Mon Sep 17 00:00:00 2001 From: Jason Etheridge Date: Tue, 19 Feb 2019 22:28:36 -0500 Subject: [PATCH] avoid trimming trailing empty fields --- text/join_lines_if_short | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/text/join_lines_if_short b/text/join_lines_if_short index 1400104..9e45adc 100755 --- a/text/join_lines_if_short +++ b/text/join_lines_if_short @@ -75,7 +75,7 @@ while (my $line = <>) { } else { $line_buffer = "$line_buffer$join_delimiter$line"; } - my @f = split /$delimiter/, $line_buffer; + my @f = split /$delimiter/, $line_buffer, -1; if (scalar(@f) >= $colcount) { $line_buffer =~ s/\x0D//g; # strip embedded carriage returns print "$line_buffer\n"; -- 1.7.2.5