Help for this page
perl -e "chomp(@F=<>); print join',',@F" file
perl -pe "tr/\n/,/" file
perl -l0054pe '' file
perl -pe "eof or tr/\n/,/" file