perl -e "@array = qw(one two, three four five, six); print qq|@array\n|" one two, three four five, six