Re^5: Parse one fiile, send the records to two different files

meh... I think the problem is with how we're using join(). I overlooked the fact that its second parameter should be the list. Try the following (note that you may still need to use chomp() on the array as mentioned in Re^5: Parse one fiile, send the records to two different files):

print $ERR_FH join(',', @fields);
[download]

Comment on Re^5: Parse one fiile, send the records to two different files Select or Download Code

Replies are listed 'Best First'.
Re^6: Parse one fiile, send the records to two different files by BigRedEO (Acolyte) on May 27, 2016 at 18:51 UTC
So close - all the commas are now back in, but it's still putting all the fields in as one big long sole record.	[reply]
Re^7: Parse one fiile, send the records to two different files by poj (Abbot) on May 27, 2016 at 19:00 UTC
Why not just print the original line with the new line ending you chomped replaced ? `print $ERR_FH $line."\n";` [download] poj	[reply] [d/l]
Re^8: Parse one fiile, send the records to two different files by stevieb (Canon) on May 27, 2016 at 19:01 UTC
...or just do this :)	[reply]
Re^8: Parse one fiile, send the records to two different files by BigRedEO (Acolyte) on May 31, 2016 at 20:17 UTC
Thank you! That's got it!	[reply]
Re^7: Parse one fiile, send the records to two different files by stevieb (Canon) on May 27, 2016 at 18:58 UTC
If I understand you correctly, you're getting a single line now, yes? Try adding a newline to the joined string: `if (!length $fields[28]) { chomp @fields; my $str = join ',', @fields; print $ERR_FH "$str\n"; }` [download]	[reply] [d/l]