|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Sergey A. Shkuratov 2:5020/133 17 Jun 2005 13:04:23
To : All
Subject : добраться до хеша в объекте
--------------------------------------------------------------------------------
Создаю объект, имея в качестве исходных данных имя его типа. Приближённо:
require "$typename";
$typename =~ s/\//::/g;
import $typename;
my $doc;
$doc = \$doc;
$doc = bless $doc, $typename;
Хочется иметь возможность:
-- писать или не писать в начале $typename.pm хэш, скажем, %options, не
обрамляя его лишними врапперами, поскольку модули $typename.pm буду писать
не только я и чем меньше ограничений на синтаксис, тем лучше.
-- определять, есть ли этот хеш в $typename.pm, и действовать в зависимости от.
-- оперировать с содержимым хеша во внешнем относительно $typename.pm
пространстве имён. Попытка писать что-то вроде %{$doc->options} приводит
к ругани на отсутствие функции options в модуле $typename.pm, что, в общем,
логично.
Вопрос: как доступиться извне к хешу в модуле $typename.pm, если объект $doc
создан так, как написано выше?
WoW!
... Дом белой птицы.
---
* Origin: Уходя - не гpусти, пpиходя - не pадуйся. (2:5020/133)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
