MSX is something completely different, but I know what you mean.
That aside, it makes use of caching configuration of windows, so let perl add a header signaliing no cahcing, and everything would work with "MSX", too.
To be more precise, perl should add respond with a haeder
Cache-Control: no-cache
In Perl you can use the CGI object for that matter:
Code:
my $query = new CGI;
print $query->header(-cache_control => 'no-cache');
You can see, if that header arrives at MSX via ? loRequest.GetAllREsponseHeaders() in VFP.
In your earlier code you simply printed the header text
print "Content-type: text/html\n\n";
You may modify that to print both headers:
print "Content-type: text/html\n";
print "Cache-control: no-cache\n\n";
Only the last header is seperated by a double \n, otherwise further "headers" become part of the html body, and even if you don't send real html, but just such a string 'G11111111111', http works this way and as a perl expert you should know a bit of that. You can again check, whether the headers arrive as such and effect the system to not cache your request.
Another solution would be to add a non used parameter with a random value and request ...yourscript.pl?dummy=dafhjkdkf, varying that parameter with each call, not using it in perl. SYS(2015) would be good to use for that. That will make it all different requests, which results won't be fetched from cache, even if you fail to suppress caching for whatever prioritized rule or policy of the system, both on client and webserver side.
Bye, Olaf.
