package Person;
use strict;
use warnings;
use base 'My::DBI';

Person->table( 'person' );
Person->columns( All => qw(person_id sex modified) );
Person->has_many( names => 'PersonName' );

1;