|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 14 Jul 2004 18:18:17 To : Anton Potekhin Subject : Re: package -------------------------------------------------------------------------------- Anton Potekhin -> All @ Wed, 14 Jul 2004 13:34:33 +0000 (UTC): AP> Hello, All! AP> делаю такой пэкадж и записываю в модуль 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> выдает ошибку.... что я не так делаю ? почему имена не экспортируются ? require отличается от use в первую очередь тем, что не делает import. Т.е. ты сам просил не импортировать экспортированные функции. -- Artem Chuprina RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757 --- ifmail v.2.15dev5.3 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/25606c988051d.html, оценка из 5, голосов 10
|