Select Code to Download

my %COLUMNS = (
    MY_FIRST_TABLE => [ qw( blah_1 blah_2 ) ], 
...

# $table defined elsewhere
my $SQL = 'SELECT ' . join(',', @{ $COLUMNS{$table} }) . " FROM $table
+";