perl -ne "{print tr/ //, $/}" FILE