Генерация SQL кода из Perl

http://search.cpan.org/~muenalan/SQL-Generator-0.02/Generator.pm
оно?

Нет, тут просто делается обёртка вокруг готовых данных. То есть, например

my %types = ( row1 => 'VARCHAR(10) AUTO_INCREMENT PRIMARY KEY',
        row2 => 'INTEGER',
        row3 => 'VARCHAR(20)'
);

Сделает CREATE TABLE со всеми этими полями, но для каждой бд описание полей придётся писать самому. А это больше половины работы.

Было бы что-то типа

{
   id => { type => 'serial', length => 11 },
   ...
}

И там не поддержки sqlite.

ORM не хочешь попробовать?

Использую Rose::DB. Клёво, но нельзя из того, что кладу в meta->setup сделать код, чтобы создать таблицу. А было бы классно...

Оно?

Хм, думал, знаю этот модуль... Оказывается там ещё generate есть. Правда, «Warning: This is an experimental method and subject to change.» Но попробовать стоит.

Спасибо!

Его, насколько я помню, DBIx::Class использует, который, в свою очередь, вполне сносно может по своим схемам и дампы делать и таблички создавать.