|
Как в perl подцепить модуль на лету
|
|||
---|---|---|---|
#18+
Есть несколько модулей........................... Какой из них нужен станет известно только на стадии выполнения.............................. Из модуля нужна только одна функция....... Код... use a; use b; use c; if (...) { a::sub } elsif (...) { b::sub } elsif (...) { c::sub } не катит, потому что неизвестно сколько... модулей вообще...................................... Нужно что-то вроде этого... $pckg = 'a'; use $pckg; $pckg::sub; :) Короче, как грамотно организовать систему plug-inов..... ... |
|||
:
Нравится:
Не нравится:
|
|||
09.04.2004, 00:14 |
|
Как в perl подцепить модуль на лету
|
|||
---|---|---|---|
#18+
Немного не так......... В папке /cgi-bin/ валяются need_a.pm need_b.pm need_c.pm need_*.pm 1.pm 2.pm Нужно выдать список модулей, которые начинаются на need_ Пользователь должен выбрать один Этот один и использовать.............. Если модуля вдруг не окажется, выдать сообщение что модуль отсутствует................. ... |
|||
:
Нравится:
Не нравится:
|
|||
09.04.2004, 00:47 |
|
|
start [/forum/topic.php?fid=23&fpage=513&tid=1479864]: |
0ms |
get settings: |
10ms |
get forum list: |
15ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
50ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
37ms |
get tp. blocked users: |
2ms |
others: | 269ms |
total: | 407ms |
0 / 0 |