1 package MyDatabase::Main::Result::Cd;
6 use base qw/DBIx::Class::Core/;
8 __PACKAGE__->table('cd');
10 __PACKAGE__->add_columns(qw/ cdid artist title/);
12 __PACKAGE__->set_primary_key('cdid');
14 __PACKAGE__->belongs_to('artist' => 'MyDatabase::Main::Result::Artist');
15 __PACKAGE__->has_many('tracks' => 'MyDatabase::Main::Result::Track');