Как сделать так, чтобы переменная была доступна глобально, т.е. во всех модулях, подключаемых к скрипту? Например:
main.pl
#!/usr/bin/perl
our $foo = 1;
use Bar;
. . .
Bar.pm
package Bar;
. . .
print $foo;
Т.е. нужно, чтобы к $foo был напрямую обращаться из Bar.
Можно, конечно, обращаться к ней как $main::foo, но проблема в том, что в mod_perl код выполняется не в main. А надо, чтобы работало везде.
