in reply to Limits in Perl

perl -e "$|=1;$_=x; {print '.'; $_ .= $_; redo }"