perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Aliet Santiesteban Sifontes <al...@tesla.cujae.edu.cu>
Subject Re: how to avoid the caching of the executed perl file
Date Thu, 22 Sep 2005 02:33:04 GMT
The problem was solved using

ModPerl::PerlRun

Thank's a lot
Malcolm J Harwood wrote:
> On Wednesday 21 September 2005 08:10 pm, Aliet Santiesteban Sifontes wrote:
>
>   
>>> On Wednesday 21 September 2005 07:09 pm, Aliet Santiesteban Sifontes 
>>>       
> wrote:
>   
>>>> Hi list, I have a  problem with a .pl script, the scripts is executed in
>>>> the first request, and it's been cached by the server, I call this
>>>> script passing different arguments, and I expect that it must be
>>>> executed with the new args but, I'm having the same output from the
>>>> first execution wich seems to be cached by the server, not the browser,
>>>> if I restart the server works with the new args, how to avoid this???
>>>>         
>
>   
>>      PerlResponseHandler ModPerl::Registry
>>     
>
> Is that deliberate? Any globals will persist between connections.
>
> If you use ModPerl::PerlRun does the problem go away?
>
>   
>> The script does some database queries, later just list it:
>> use strict;
>> use DBI;
>> use CGI;
>> use CGI::Carp qw(fatalsToBrowser);
>> use lib::Master;
>> # Let's require session stuff
>> use lib::SessionUtil;
>> ...
>> print $cgi->header,                    # create the HTTP header
>>          $cgi->start_html(-onload=>"if ($isInvitado==1){
>>                                        top.Nav='".${$config}{"nav"}."';
>>                                     };
>>                                     if (top.Nav > '' ) {
>>
>> top.frames.Navigation.location.href=top.Nav;
>>                                    top.Nav='';
>>                                      };
>>                                      top.CountRows=$NumRows;
>>                                      top.isRow=$isRow;
>>
>> top.CantRows=".${$config}{"CantRows"}.";
>>
>> top.frames.Path.location.href='".${$config}{"path"}."';
>>
>> top.isTitleLeft='".${$config}{"LeftTitle"}."';
>>
>> top.isTitleRight='".${$config}{"RightTitle"}."';
>>                                      top.setTitle();
>>                                      top.ListCode='$ListCode';
>>                                      top.Level = '".${$config}{"Level"}."';
>>                                      top.Origen = '$Origen';
>>                                      top.IDAux = '$ID';
>>                                      top.Filtro='$Filtro';
>>
>> top.Parame[".${$config}{"Level"}."]='$Parametro';");
>> blaablala...
>> ....end_html...
>>     
>
> Where are you getting the data in this? It doesn't look like it's your output 
> code.
>
> Check you are reinitialising any globals you might have. Check for closures in 
> your data acquisition code.
>
>
>
>
>   





Mime
View raw message