package MyClass; use base 'Class::DBI'; # Stuff.... sub connect { # .... } sub db_Main() { return connect; }