$ctr2=0;
for ($ctr = 0; $ctr < 180; ++$ctr) # 180 arbitrary
   {
    print "$ctr  ";      # val followed by two spaces
    $ctr2++;             # flag
    if ($ctr2 == 12) 
      {
      print "\n";
      $ctr2 = 0;
      }
   }
exit;