package MyDB;
use base 'Class::DBI';
__PACKAGE__->set_db('Main', 'dbi:mysql:mydb', 'public', 'password');
1;
####
package MyDBUpdate;
use base 'Class::DBI';
__PACKAGE__->set_db('Main', 'dbi:mysql:mydb', 'staff', 'password');
1;
####
package Person;
use base 'MyDB';
__PACKAGE__->table('person');
__PACKAGE__->columns(All => qw/
first_name
last_name
street
city
state
zip
/);
1;
####
package PersonUpdate;
use base 'MyDBUpdate';
__PACKAGE__->table('person');
__PACKAGE__->columns(All => qw/
first_name
last_name
street
city
state
zip
/);
1;
####
package PersonUpdate;
use base 'Person';
__PACKAGE__->set_db('Main', 'dbi:mysql:mydb', 'staff', 'password');
1;