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