Как из под перлового скрипта создать таблицу в MySQL?

• как создать таблицу в MySQL,Parish, 13:26 , 17-Июл-03
  • как создать таблицу в MySQL,шторм, 03:58 , 18-Июл-03
    • как создать таблицу в MySQL,Vladimir, 15:39 , 23-Июл-03
      • как создать таблицу в MySQL,шторм, 07:31 , 24-Июл-03
      • как создать таблицу в MySQL,gp, 22:31 , 19-Сен-03

>Как из под перлового скрипта создать таблицу в MySQL?

use DBI;

>>Как из под перлового скрипта создать таблицу в MySQL?
>
>use DBI;
Эт я знаю, а как непосредственно таблицу создать?

use DBI;
$dbh=DBI->connect("dbi:MySQL:dbname=$dbnamel;host=$host","$username","$password");
if(!$dbh)
    {
    print("Not connect to database $dbname!!!\n");
    exit(0);
    }
$cmd="create table $table_name (id serial,................................)";
    $sth=$dbh->prepare($cmd);
    $ret=$sth->execute;
    if(!$ret)
        {
        print("Error when execute $cmd!!!\n");
        }
вот

Спасибо

>use DBI;
>$dbh=DBI->connect("dbi:MySQL:dbname=$dbnamel;host=$host","$username","$password");
>if(!$dbh)
>    {
>    print("Not connect to database $dbname!!!\n");
>    exit(0);
>    }
>$cmd="create table $table_name (id serial,................................)";
>    $sth=$dbh->prepare($cmd);
>    $ret=$sth->execute;
>    if(!$ret)
>        {
>        print("Error when execute $cmd!!!\n");
>
>        }
>вот

Или просто в одну строку:
$rv  = $dbh->do($statement);