Select Code to Download

push @grid, [ @input ] for @input;

@grid = (
  [ qw( a b c d ) ],
...
  [ qw( a b c d ) ],
  [ qw( a b c d ) ],
);

print "@$_\n" for @grid;