Модули и require

[aster_x]

Есть такая проблема:

имеется модуль Base.pm
#####################
...

sub connect{
  my (%data) = @_;
  ...
  require "$data{b_type}";  # В данном случае подключаем \'mysql.pl\';
  ...
}

######################


и "mysql.pl"
######################

sub connectdb{
  ...
  my $self = {};
  ...
  return $self;
}
######################

Вопрос: как из connect вызвать connectdb так, чтобы
$self имел принадлежность к классу Base?


Заранее признателен за любые ответы..

[ondr]

могу дать совет: начни с простых примеров, более простых. они есть почти в любой книжке по Perl.

[aster_x]

ondr:
могу дать совет: начни с простых примеров, более простых. они есть почти в любой книжке по Perl.

Да ты не понял - Когда все функции находятся в Base.pm - все нормально:
и bless итп, а вот если я там делаю require, а вызываю как метод классы - Хрен..

[Anarki]

require "$data{b_type}";
А это точно сработает, вроде бы на стадии компиляции модули подключаются?

[Chs]

perldoc -f bless

bless REF,CLASSNAME
bless REF
Почувствуй разницу.