$ perl -e 'print join(qw/a b c d e f/),"\n"' bacadaeaf