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;