茶しぶ男
1999/12/29(水) 14:33:25
perlでgifやjpgを出力する場合、以下の方法で出来ますが、pdfの場合は「Content-type:」の後ろをどう指定すれば良いのでしょう
$url = '../hogehoge/hogehoge.jpg'
print "Content-type: image/jpeg\n\n"; # gifの場合はimage/gif
$size = -s $url;
open(IN, $url);
binmode(IN);
binmode(STDOUT);
read(IN, $buf, $size);
print $buf;
close(IN);
#
http://www.tohoho-web.com/wwwcgi3.htm にContent-type: の説明がありますが、pdfは載っていませんでした。
# 試しに、「image/pdf」とやったらダメだった・・・。
# この方法だと、ソースで見てもわけのわからんコードが出るだけなのでURL隠しに有効です。