in reply to A large table with DBI

Try 
my $colStr = join(' INTEGER,', @colArray) . ' INTEGER';
my $sql = "CREATE TABLE my_table ( $colStr )";
# print $sql # for debugging
$dbh->do($sql);

[download]

In Section Seekers of Perl Wisdom