dbic2go.txt

#!/usr/bin/perl

use DBIx::Class::Schema::Loader qw(make_schema_at);

make_schema_at(
    "Kiai::Schema",
    {
        debug          => 1
        dump_directory => "/tmp/kiai",
    },
    [
        "dbi:mysql:dbname=kiai", "user", "pass"
    ]
);

exit 0;