Automatic database schema generation and migration with Perl

In Ror or Django or web2py you can "describe" a database (as a set of classes that remaps to tables) and the framework (having being provided with a connection string to the desired database) generates the tables, fields, relations and in the case of RoR and web2py it also keeps it up-to-date (eg, removing a class drops the table, adding a property to the class triggers an开发者_如何学Python "alter table add" etc).

Is there any Perl module that does the same? Eg, it takes the YAML/XML/JSON description of a database as input and modifies/generates the database schema accordingly?

Yes, the module is SQL::Translator::Parser::YAML, and here is some documentation

I have an alpha version GPL project that does this. Though it is written in PHP, it can be invoked from Perl:

System("/path/to/triBuilder.php --yaml=....");

http://code.google.com/p/triangulum-db/