$a="9"x8000;print$a,"\n",$a