D:\Users\lanx>perl -e "$_='x';print;print;print;print;print;print;print;print;print;print;print;print;print;pri nt;print" xxxxxxxxxxxxxxx