Select Code to Download

push (@StatsArray, {RegionNum=>$RegionNum,
                    AR=>$AR[$RegionNum],
                    BCR=>$BCR[$RegionNum]});

foreach $RegionCoords (@AllRegionCoords) {
     $RegionNum++;
...
          }
     }
}