(perl)PDF書類をContent-type:で出力するには？

茶しぶ男 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」とやったらダメだった・・・。

＃この方法だと、ソースで見てもわけのわからんコードが出るだけなのでＵＲＬ隠しに有効です。

B-Cus 1999/12/29(水) 15:11:50
application/pdf

茶しぶ男 1999/12/29(水) 15:24:22
[[解決]]
B-Cusさん、短～い回答ありがとうございます。
「image/jpeg」を「application/pdf」に変えるだけで無事出来ました。

>とほほさん
もし、よろしければ
http://www.tohoho-web.com/wwwcgi3.htm
に「application/pdf」を追加してもらえると幸いですm(_ _)m。

B-Cus 1999/12/29(水) 20:46:23
追加。

1. mime type
ftp://ftp.iana.org/in-notes/iana/assignments/media-types/media-types
2. せっかく -s でサイズを取得しているんだから、ヘッダに
content-length を付けましょう。

[上に] [前に] [次に]