$ perl -e '@words = ("one\n","two\n","three\n","four\n","five\n","six\n",); chomp @words; print join";", @words;' one;two;three;four;five;six