use base A .... sub Schedule { my ($self) = @_; $self->addTab(\&AddLocalTime); $self->addTab(\&WatchLog);#This method is defined in the parent class $self->addTab(\&SendEmail); #Same here } sub AddLocalTime { }