cat data.txt | perl -00pe 's/\\n/,/g'