>I have a pdf document that I CANNOT let cache on the users machine due to
>it's sensitive nature. I have played with different headers to resolve
>this
>but to no avail. -pragma => 'no-cache' and -expires => '-1d'
What is the exact nature of the problem?? isnt the page cached for certain
browser types and versions only??
please provide more details.
i would suggest you also post your question to the PERL forum at
Experts-Exchange.
http://www.experts-exchange.com/jsp/qList.jsp?ta=perl
>Below is a script that prints the pdf to the browser.
>This is extremely important, any help would be GREATLY appreciated.
>byron#!/usr/local/bin/perl -w
>
>use CGI;
>use strict;
>use Salu;
>my $q = new CGI;
>
>my $BUFFER_SIZE = 4_096;
>my $IMAGE_DIRECTORY = $q->param('path');
>my $buffer = '';
>my $flag=0;
>
>if ( $q->param('info') )
> {
> print $q->header( -type => "application/pdf");
> $flag = 1;
> }
>if ( $ENV{'HTTP_REFERER'} =~ /neuroresults.cgi$/ )
> {
> print $q->header( -type => "application/pdf");
> $flag = 1;
> }
>if ($flag == 0)
> {
> print "Location: /error.htm\n\n";
> }
>
>binmode STDOUT;
>
>$IMAGE_DIRECTORY =~ s/^"//;
>$IMAGE_DIRECTORY =~ s/"$//;
>
>open (IMAGE, $IMAGE_DIRECTORY) or die "Can't open the image \n";
>while (read( IMAGE, $buffer, $BUFFER_SIZE))
> {
> print $buffer;
> }
>
>close IMAGE;
>exit(1);
>
>
>
>
>
>
>
>
>_______________________________________________________
>Send a cool gift with your E-Card
>http://www.bluemountain.com/giftcenter/
>
>
>_______________________________________________
>Perl-Unix-Users mailing list. To unsubscribe go to
>http://listserv.ActiveState.com/mailman/subscribe/perl-unix-users
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com
_______________________________________________
Perl-Unix-Users mailing list. To unsubscribe go to
http://listserv.ActiveState.com/mailman/subscribe/perl-unix-users
