|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Mikhail Polykovsky 2:5020/400 13 Jun 2003 10:13:17
To : All
Subject : BEGIN - DESTROY
--------------------------------------------------------------------------------
Здравствуйте.
Допустим, есть класс, все экземпляры которого пользуются коннектом к
базе (одним на все экземпляры).
package My;
use DBI;
my $dbh;
sub BEGIN{
$dbh = connect_to_database();
}
sub new{
# tru-la-la
$self->{'handle'} = $dbh;
}
Вопрос в том, как мне организовать DESTROY? Если отключаться от базы в
нем, тогда скрипт отключится при первом удалении объекта, остальные не
смогут работать с базой. А если вообще ни один экземпляр не
создавался, DESTROY не будет вызван, и коннект повиснет. Как
поступить?
З.Ы. Вопрос не про конкретное подключение, а вообще про подобные
реализации.
--
Михаил Полыковский
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: UTC (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
