package DB::Service;

use base DB::Base;
use strict;
use warnings;

my %config = ( table => 'service' );

...

package DB::Base
use strict;
use warnings;


sub load {
  my ($self) = @_;

  $self->getDataFromTable($config{table});
}