gistfile1.txt

package PartsDB::Schema::Result::Part;
use strict;
use warnings;
use base qw/DBIx::Class::Core/;

__PACKAGE__->table('parts');
__PACKAGE__->add_columns(id => {is_auto_increment => 1});
__PACKAGE__->add_columns(qw/category_id name sku/);
__PACKAGE__->set_primary_key('id');

__PACKAGE__->belongs_to(category => 'PartsDB::Schema::Result::Category', 'category_id');

1;