view release on metacpan or  search on metacpan

t/lib/Schema2/Result/Myrole.pm  view on Meta::CPAN

package Schema2::Result::Myrole;
use Modern::Perl;
use base qw/DBIx::Class::Core/;
__PACKAGE__->table('myrole');
__PACKAGE__->add_columns(
    id   => { data_type => 'integer' },
    rolename => { data_type => 'varchar', size => 32 },
);
__PACKAGE__->set_primary_key('id');
__PACKAGE__->has_many(
    myuser_roles => 'Schema2::Result::MyuserRole',
    'role_id'
);
1;