Previous Pages/Requests appearing
[prev] [thread] [next] [Date index for 2005/05/30]
From: cfaust-dougot
Subject: Previous Pages/Requests appearing
Date: 14:30 on 30 May 2005
Subject: Previous Pages/Requests appearing
Date: 14:30 on 30 May 2005
This is a multi-part message in MIME format.
------_=_NextPart_001_01C56524.27BABE4A
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Folks,
=20
I am having problems with previous pages/requests showing up on =
refreshes and/or the clicking on links not going to the proper page etc. =
etc.
=20
Its a new server and I didn't think it was the code so I commented out =
all mod_perl scripts and added the simple script below.
=20
I also got the same problem with the script, even though I had =
"?aaa=3Dtrue", the page wouldn't change to what was defined by the =
"print_aaa" sub, switching to "?bbb=3Dtrue" would result in no change =
either.
=20
What is strange is all I would need to do is wait 4 or 5 seconds and =
then go back and the very first request would always do the proper =
thing, of course "perl-status" showed a new process (perl-status never =
showed more then 1 process during the testing).
=20
Any idea?
=20
Thanks
-Chris
=20
=20
##### Test Script ##
package MP2ShareTest;
=20
use strict;
use CGI;
use vars qw($r $CGI);
######################################################################
# Main
# Our Mod_Perl Content Handler
sub handler {
$r =3D shift;
$CGI =3D new CGI();
my %form_data =3D ();
%form_data =3D $CGI->Vars;
if ($form_data{'bbb'} eq 'true') {
&print_bbb();
} elsif ($form_data{'aaa'} eq 'true') {
&print_aaa();
} else {
print "No Form Data";
}
=20
return Apache2::Const::OK;
=20
} # End of Sub
########################################################################
sub print_aaa {
print '<a href=3D"/mp2sharetest?bbb=3Dtrue">Click for BBB</a>';
}
########################################################################
sub print_bbb {
print '<a href=3D"/mp2sharetest?aaa=3Dtrue">Click for AAA</a>';
}
#########################################################################=
#
1;
------_=_NextPart_001_01C56524.27BABE4A
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><HTML =
DIR=3Dltr><HEAD><META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Diso-8859-1"></HEAD><BODY><DIV><FONT face=3D'Arial' =
color=3D#000000 size=3D2>Folks,</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2>I am having problems with previous =
pages/requests =0A=
showing up on refreshes and/or the clicking on links not going to the =
proper =0A=
page etc. etc.</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2>Its a new server and I didn't think it =
was the code =0A=
so I commented out all mod_perl scripts and added the simple script =0A=
below.</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2>I also got the same problem with the =
script, even =0A=
though I had "?aaa=3Dtrue", the page wouldn't change to what was defined =
by the =0A=
"print_aaa" sub, switching to "?bbb=3Dtrue" would result in no change =0A=
either.</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2>What is strange is all I would need to =
do is wait 4 =0A=
or 5 seconds and then go back and the very first request would always do =
the =0A=
proper thing, of course "perl-status" showed a new process (perl-status =
never =0A=
showed more then 1 process during the testing).</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2>Any idea?</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2>Thanks</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2>-Chris</FONT></DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>=0A=
<DIV><FONT face=3DArial size=3D2>##### Test Script ##</FONT></DIV>=0A=
<DIV>package MP2ShareTest;</DIV>=0A=
<DIV> </DIV>=0A=
<DIV>use strict;<BR>use CGI;<BR>use vars qw($r $CGI);</DIV>=0A=
<DIV>####################################################################=
##<BR># =0A=
Main<BR># Our Mod_Perl Content Handler<BR>sub handler {<BR> $r =3D =0A=
shift;</DIV>=0A=
<DIV> $CGI =3D new CGI();<BR> my %form_data =3D =
();<BR> %form_data =3D =0A=
$CGI->Vars;</DIV>=0A=
<DIV> if ($form_data{'bbb'} eq 'true') =0A=
{<BR> &print_bbb();<BR> } elsif ($form_data{'aaa'} =
eq =0A=
'true') {<BR> &print_aaa();<BR> } else =0A=
{<BR> print "No Form =
Data";<BR> }<BR> <BR> return =0A=
Apache2::Const::OK;<BR> <BR>} # End of =0A=
Sub<BR>##################################################################=
######<BR>sub =0A=
print_aaa {</DIV>=0A=
<DIV> print '<a href=3D"/mp2sharetest?bbb=3Dtrue">Click for =0A=
BBB</a>';<BR>}<BR>#################################################=
#######################<BR>sub =0A=
print_bbb {</DIV>=0A=
<DIV> print '<a href=3D"/mp2sharetest?aaa=3Dtrue">Click for =0A=
AAA</a>';<BR>}<BR>#################################################=
#########################<BR>1;</DIV></BODY></HTML>
------_=_NextPart_001_01C56524.27BABE4A--
 |
Previous Pages/Requests appearing
|
|
 |
RE: Previous Pages/Requests appearing
|