|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Yury Kopyl 2:5020/400 14 Jul 2004 17:43:47 To : Anton Potekhin Subject : Re: package -------------------------------------------------------------------------------- Anton Potekhin -> "package" : AP> Hello, All! AP> делаю такой пэкадж и записываю в модуль package conf; AP> BEGIN { AP> use Exporter(); AP> @ISA = qw(Exporter); AP> @EXPORT = qw(&connect &disconnect); AP> } AP> $driver = "mysql"; AP> $database="spidergiveramp"; AP> $hostname="localhost"; AP> $user="root"; AP> $password='scout'; AP> sub connect { AP> .... AP> } AP> sub disconnect { AP> .... AP> } AP> return 1; AP> END { } AP> затем в скрипте пишу : AP> require 'conf.cgi'; AP> $dbh = conf::connect(); AP> то вызывается функция из моего модуля и все ок работает... AP> А Export не работает т.е AP> require 'conf.cgi'; AP> $dbh = connect(); AP> выдает ошибку.... что я не так делаю ? почему имена не AP> экспортируются ? Потому что модули подключать так: use conf; что равносильно {require 'conf.pm'; conf->import}. Exporter в функции import ипортирует имена функций и переменных в пространство имен пакета (в данном случае в main). Yury Kopyl aka hrg | http://id.totem.ru | "бысто сп..ил и ушел - называется нашел..." --- ifmail v.2.15dev5.3 * Origin: IAC Samara-Internet, Ltd. (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/10277a767aab2.html, оценка из 5, голосов 10
|