Help for this page
#!/usr/bin/perl use strict; use warnings; ... my $op4 = MyCDBI::OrgPart->create({ typeid => 4, typeid => $pt2 }); $org->delete;
CREATE TABLE org ( orgid tinyint(3) unsigned NOT NULL auto_increment, PRIMARY KEY (orgid) ... orgid tinyint(3) unsigned default '0', PRIMARY KEY (typeid) ) TYPE=MyISAM;