perl -wle '$a = "9" x 100; $a++; print $a'