package Person; use base 'MyCDBI'; __PACKAGE__->table('people'); __PACKAGE__->columns(All => qw(id name)); # CREATE TABLE people ( # id INT NOT NULL auto_increment, # name VARCHAR(255) NOT NULL, # PRIMARY KEY (id), # UNIQUE (name) # );