Select Code to Download

my @table=();
my $row=0;
...
  }
  $row++;
}

my @table_linear;
map { push @table_linear, @{$_} }, @table;

my @table_linear;
foreach (@table) { 
  push @table_linear, @{$_} 
}