for (my $i=1;$i<3;$i++) {
   $print_heading = 1;
   $game_index = $i;
   create_tables ($print_heading, $game_index, %totals);
}