Select Code to Download

for my $x (0..21) {
  for my $y (0..79) {
     do_stuff($vscr[$x][$y]);
  }
}

for my $x (0..$#vscr) {
  for my $y (0..$#{$vscr[$x]}) {
     do_stuff($vscr[$x][$y]);
  }
}