Alessandro Forghieri wrote:
[...]
use Bar qw($foo);
if($foo) {
...
Global symbol "$foo" requires explicit package name at
use vars qw($foo);
use Bar qw($foo);
or with 5.6+
our $foo;
use Bar qw($foo);
See:
http://perl.apache.org/docs/general/perl_reference/perl_reference.html#Using_Global_Variables_and_Sharing_Them_Between_Modules_Packages
__________________________________________________________________
Stas Bekman JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide ---> http://perl.apache.org
mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org http://ticketmaster.com