James Biggs <[EMAIL PROTECTED]> was heard to say:

>
> I can do for example
>
> $dbh->do( "CREATE TABLE my_table (etc etc etc)");
>
> but i don't know a Perl command for creating a table with many columns. I
> did not find one in the docs either. Thanks
>

Something along these lines (untested!!) should work:

my $command = "CREATE TABLE my_table (";

foreach my $counter (1..999) {
  $columns .= "INT column" . $counter . ", ";
}

$command .= "INT column1000)";

print $command;

You may need to name your columns more intelligently.

regards,
Markus

-- 
Markus Hoenicka
[EMAIL PROTECTED]
(Spam-protected email: replace the quadrupeds with "mhoenicka")
http://www.mhoenicka.de

Reply via email to