$all_of_it = 100;
my $learned = 2;
while($learned < $all_of_it)
   {
   $learned++;
   $all_of_it.='0';
   }