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 )