Исходное сообщение
"экспорт переменных в модули perl" Отправлено PoizOn, 29-Июн-05 16:46
>>Если можно - буду очень признателен за ссылки на источники по правильному >>написанию модулей и вообще основам "ООП" на перл > >Начать стоит с находящихся под рукой: >           perlmod >           > Perl modules: how they work >           perlmodlib >         Perl modules: >how to write and use >           perlmodstyle >       Perl modules: how to >write modules with style > >           perlboot >           >Perl OO tutorial for beginners >           perltoot >           >Perl OO tutorial, part 1 >           perltooc >           >Perl OO tutorial, part 2 > >и perlstyle Писал совсем недавно программу, разбитую на модули и подключаемые через use, так как в модулях хранились глобальные хэши и пара функций, заворачивать все это в ОО модель было просто лень (и с экспортом тоже не хотелось возится). Я работал так: myscrip.pl ------------------ #!/usr/bin/perl use DATA;# мой модуль DATA::Prepare(args);# вызов функции из модуля. print %DATA::RUTS;# вывод глобальной переменной определенной в модуле. и т.п ----------------- Модуль DATA.pm был примерно такой: --------- package DATA; %DATA::RUTS=(); sub Prepare { } # .... 1; __END__ Так что в вашем случае (перестройки дома) возможно лучше обойтись без ОО.