package MyModel5::table3; use strict; use warnings; use base 'MyModel5'; __PACKAGE__->attr(table => 'table3'); __PACKAGE__->attr('primary_key' => sub { ['key1', 'key2'] }); 1;