perl -e 'print "x" x 1000' > outfile.txt