>> All scripts on
>> site start with:
>> 
>> use vars qw(%input $r);
>> $r = Apache->request;
>> 
>> This has worked fine...no complaints in log files...until I switched the
>> handler from Registry to RegistryNG;
>> 
>> Now I see occasional:
>> Variable "$r" will not stay shared at /home/httpd/perl/daily-news.pl
>> line 9 (#1)
>> in log files.
> 
> 
> http://perl.apache.org/guide/troubleshooting.html#Value_of_x_will_not_stay_shared

Thanks for the reply and the guide (of which I'm pretty familiar) Stas.
See comments above and below. $r is global in my scripts.
Unless I'm misunderstanding something, the warning shouldn't be 
occurring. Wasn't under Registry. Also these warnings do not appear on 
every page request, so I'm wondering if it has something to do with the 
compile stage of perlrun and/or something that happens during a new 
apache process creation.

 
> 
>> first nine from daily-news.pl:
>> #!/usr/bin/perl -w
>> use strict;
>> use DBI;
>> use date_site;
>> my $dateformat = date_site::dateformat;
>> use Apache::Request;
>> 
>> use vars qw($dbh %input %output %filebase $r %sites); #vars used on $r
>> $r = Apache->request; #<--here
>> 

Thanks,

-- 
Daniel Bohling
NewsFactor Network

Reply via email to