![]() |
|
Модераторы: korob2001, ginnie |
![]()
|
|
| Logo |
|
|||
|
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 694 Регистрация: 22.7.2008 Репутация: 3 Всего: 10 |
При вызове import передается список импорта по правилам Exporter, т.е. с списками тегов :foo, с !foo и /foo/.
Как из этого получить список того что Exporter будет экспортировать? Либо сначала экспортировать, а потом узнать, что он экспортировал, для задачи без разницы. |
|||
|
||||
| arto |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
посмотреть namespace ?
|
|||
|
||||
| Logo |
|
||||
|
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 694 Регистрация: 22.7.2008 Репутация: 3 Всего: 10 |
В смысле? Хочу, чтобы модуль работал через Exporter, но для каждой экспортируемой функции нужно еще произвести дополнительные действия.
К примеру из списка:
Получить в процедуре import список:
С реальными именами, с которыми можно работать. До или после export_to_level - не важно. |
||||
|
|||||
| arto |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
# perl -MData::Dumper -le 'print Dumper \%Data::Dumper::'
$VAR1 = { 'version::' => *{'::version::'}, '/' => *{'::/'}, 'stderr' => *::stderr, 'SIG' => *::SIG, '_<mro.c' => *{'::_<mro.c'}, 'Tie::' => *{'::Tie::'}, 'utf8::' => *{'::utf8::'}, '1' => *{'::1'}, '"' => *{'::"'}, и т.д. |
|||
|
||||
| Logo |
|
|||
|
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 694 Регистрация: 22.7.2008 Репутация: 3 Всего: 10 |
Не подойдет. Мало того, что надо шерстить всю таблицу имен, так ведь не узнать, действительно ли функция экспортировалась из моего модуля.
К примеру, в моем модуле есть функция foo. Но пользователь не захотел ее использовать, а использовал функцию с таким же именем foo из другого модуля, или написал свою. В таблице имен будет функция foo, но реально экспорт foo из моего модуля никто не запрашивал. |
|||
|
||||
![]()
|
| Правила форума "Perl" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |