The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

babilu_create_dbic_schema.pl -- create schema from current database

SYNOPSIS

  ./ babilu_create_dbic_schema.pl --debug --rels --dest=/tmp/lol

    Options: --dest chose the destination directory MUST be used
    if you use rels-- help this output-- debug be verbose
    -- rels analyze relationships between tables
    -- host db hostname( defaults to localhost )

    = cut

    1;