Определение глобальных переменных в Perl Mason Framework

Question

Недавно я столкнулся с проблемой: как определить глобальную переменную в Perl Mason Framework?Мне нужно определить переменную и присвоить ей значение, которое будет видно из всех компонентов Mason, но все мои попытки оказываются неудачными, потому что компоненты сообщают, что они не видят переменную.

Спасибо ввперед.

Answer 1

Вам потребуется объявить глобальные переменные в параметре allow_globals в конфигурации Apache или при создании объекта интерпретатора Mason.

Пример использования объекта интерпретатора Mason:

my $interp = HTML::Mason::Interp->new(
    ...,
    allow_globals => [
        '$global',
    ],
);

Пример с настройкой Apache:

PerlAddVar MasonAllowGlobals $global