perl -e 'for ($i=1; $i<=10; $i++) { print int (rand()*100) . "\n";}'
27
53
72
53
85
68
57
44
23
21

   for ($i = 1; $i <= 10; $i++)
   {
      $randomScore = int (rand() * 100);
      print "  $randomScore \n";
   }