package TOPO; use base 'Class::DBI'; TOPO->connection(...); package TOPO::ventry; ... package TOPO::ventryabstract; ... package main; # define the relationship here