package MyPackage; use base qw(MyPackage::Base); __PACKAGE__->add_column('name'); __PACKAGE__->add_column('address'); 1;