Есть такая проблема:
имеется модуль Base.pm
#####################
...
sub connect{
my (%data) = @_;
...
require "$data{b_type}"; # В данном случае подключаем \'mysql.pl\';
...
}
######################
и "mysql.pl"
######################
sub connectdb{
...
my $self = {};
...
return $self;
}
######################
Вопрос: как из connect вызвать connectdb так, чтобы
$self имел принадлежность к классу Base?
Заранее признателен за любые ответы..