|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 17 Jun 2005 16:47:53
To : Sergey A. Shkuratov
Subject : Re: добраться до хеша в объекте
--------------------------------------------------------------------------------
Sergey A. Shkuratov -> Artem Chuprina @ Fri, 17 Jun 2005 15:13:39 +0400:
>>>>> Создаю объект, имея в качестве исходных данных имя его типа.
>>>>> Приближённо:
>>>>>
>>>>> require "$typename";
>>>>> $typename =~ s/\//::/g;
>>>>> import $typename;
>>>>>
>>>>> my $doc;
>>>>> $doc = \$doc;
>>>>> $doc = bless $doc, $typename;
AC>> Откуда у тебя возьмется хэш свойств объекта, если объект у тебя - scalar
AC>> reference, причем сам на себя же (читай: с тобой утечка памяти)?
SAS> Тогда как правильно создать объект, чтобы утечки не было? Покажи,
SAS> пожалуйста, на примере выше...
А можно я тебя отправлю в perldoc perltoot до просветления? А то ты
сейчас детскими вопросами замучаешь...
P.S.
$typename.pm:
sub new { bless {}, $_[0]; }
скрипт:
my $doc = new $typename;
--
Artem Chuprina
RFC2822: <ran{}ran.pp.ru> Jabber: ran@jabber.ran.pp.ru
Пользователь юникса перестаёт быть пользователем юникса если после его
пользования пользованный юникс перестаёт быть юниксом. (с)
--- ifmail v.2.15dev5.3
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
