|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 28 Feb 2003 23:09:25
To : "Timur Vafin"
Subject : Re: Ошибки в %EXPORT_TAGS под mod_perl
--------------------------------------------------------------------------------
Здравствуй, Timur Vafin.
TV> Есть два хоста под mod_perl, в обоих используются разные модули с одинаковым
TV> названием Proj::Defines.
TV> В каждом подобные конструкции:
TV> %EXPORT_TAGS = (
TV> 'tag1' => [ qw|%hash1| ],
TV> 'tag2' => [ qw|%hash2| ],
TV> 'common' => [ qw|%commonHash|],
TV> );
TV> foreach my $key (keys(%EXPORT_TAGS)) {
TV> map {push @{$EXPORT_TAGS{$key}},$_ } @{$EXPORT_TAGS{'common'}}
TV> }
TV> $EXPORT_TAGS{'all'} = [map {@{$EXPORT_TAGS{$_}}} qw|tag1 tag2 common|];
TV> @EXPORT_OK = @{$EXPORT_TAGS{'all'}};
TV> В скритах из разных проектов подключаются одинаково
TV> use lib '/full/path/to/proj/lib';
TV> use Proj::Defines qw(:tag2);
TV> Вовремя выполнения скриптов из разных проектов неожиданно вылеает
TV> "tag2" is not defined in %Proj::Defines::EXPORT_TAGS at
TV> /full/path/to/script.pl line NN
TV> Перезапускаю апач и все нормально...
TV> Получается, что где начинает использоваться чужой %EXPORT_TAGS...
TV> Где напутал, не пойму...
Чего ж тут непонятного? Кто первый встал, того и тапки. Имя-то общее...
--
Artem Chuprina
Communiware.net
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757
--- ifmail v.2.15dev5
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Ошибки в %EXPORT_TAGS под mod_perl 