Сообщения

1

Perl / Модули и require

« : 20 Сентября 2005, 18:04:18 »

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

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

2

Perl / Модули и require

« : 19 Сентября 2005, 19:55:38 »

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

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

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

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


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

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

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


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