ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Ilya Soldatkin                       2:5020/400     26 Oct 2000  14:36:10
 To : Eugene Scripnik
 Subject : package
 -------------------------------------------------------------------------------- 
 

 Wed Oct 25 2000 20:02, Eugene Scripnik wrote to All:
 
  ES> Привет, All.
 
  ES> Обьясните как правильно оформить сабж, чтоб можно было использовать
  ES> переменные обьявленные в нем? Hу, к примеру, нужен package с хэшем
  ES> внутри, который содержит текущую конфигурацию, и хочется извне
  ES> использовать эту конфигурацию. 
 
 Я использую такой вариант.
 
 модуль Sort.pm
 ------------------------------
 package Sort;
 use strict;
 BEGIN
 {  
   use Exporter();
   @Sort::ISA = qw(Exporter);
   @Sort::EXPORT = qw();
   @Sort::EXPORT_OK = qw(%config);
 }
 
 use vars qw(%config);
 
 $config{'server'}='http://www.....';
 $config{'plpath'}='/cgi-bin/...';
 $config{'htmlpath'}='/...';
 ...
 ----------------------------------------
 
 подключаю модуль таким образом:
 ------------------------
 use Sort qw(%config);
 use vars qw(%config);
 ------------------------
 Откуда взял идею
 http://perl.apache.org/guide/porting.html#Configuration_Files_Writing_Dy
 
 --- ifmail v.2.15dev5
  * Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    package   Eugene Scripnik   25 Oct 2000 20:02:20   Re: package   Artur Penttinen   26 Oct 2000 12:37:40   Re: package   Artem Chuprina   26 Oct 2000 12:59:14   Re: package   Vitaliy T Morarian   27 Oct 2000 20:23:35   package   Ilya Soldatkin   26 Oct 2000 14:36:10   package   Konstantin Osipov   26 Oct 2000 20:50:26