WebR::M::CDBI::DatafileRelationship->has_a(child=>'WebR::M::CDBI::Datafile'); WebR::M::CDBI::DatafileRelationship->has_a(parent=>'WebR::M::CDBI::Datafile'); WebR::M::CDBI::Datafile->has_many(parents=>['WebR::M::CDBI::DatafileRelationship' => 'parent'],'child', { cascade => 'Class::DBI::Cascade::Delete'}); WebR::M::CDBI::Datafile->has_many(children=>['WebR::M::CDBI::DatafileRelationship' => 'child'],'parent', { cascade => 'Class::DBI::Cascade::Delete'} );