# perl -e 'print "one\n",print "two\n"' two one 1