Data-Transfigure
view release on metacpan or search on metacpan
t/lib/MyApp/Schema/Result/Person.pm view on Meta::CPAN
id => {data_type => "integer", is_nullable => 0, is_auto_increment => 1,},
firstname => {data_type => "varchar", is_nullable => 0, size => 100},
lastname => {data_type => "varchar", is_nullable => 0, size => 100},
);
__PACKAGE__->set_primary_key("id");
__PACKAGE__->has_many(
"books", "MyApp::Schema::Result::Book",
{"foreign.author_id" => "self.id"},
{cascade_copy => 0, cascade_delete => 0},
);
1;
( run in 0.642 second using v1.01-cache-2.11-cpan-49f99fa48dc )