Select Code to Download

    ### grabbing every column
    my $dbCommand = qq^select ^;
...
        $dbCommand .= "$_,";
    }
    $dbCommand =~ s/,$//;

my $dbCommand = 'select '.join ',',@ticketsFields;

my @newArray = @{$rows};

 for(my $x = 0; $x < $ticketsFieldsSize; $x++)
            {
...
                $GenericData{$ticketsFields[$x]} = $newArray[$x];
            }

@GenericData{@ticketsFields} = @$rows;

\@ticketsRecords;
}