Select Code to Download

for my $sheet (1..3) {
   my @sheet;
...
   }
   push @sheets, \@sheet;
}

for my $sheet (1..3) {
   for my $row (1..3) {
...
      }
   }
}