CGI経由PDFダウンロードでエラー
CGIの知識が全くなく、いろいろなサイトを参考にさせていただいています。
表現等が正しくないことがあるかもしれませんが、ご了承下さい。
htmlのsubmitからcgiを経由してpdfをダウンロードさせるように作成中です。
cgiは、下記Uページを参考にさせていただきました。
http://www.abe-tatsuya.com/web_prog/perl_cgi/content_disposition.php
#実際の記述<-----------------------------------------------
#-- ダウンロードさせる元ファイル
$source = 'doc.pdf';
#-- 保存時のファイル名(デフォルト)
$filename = '申込書.pdf';
#-- HTTPヘッダ送信
print qq|Content-type: application/pdf\n|;
print qq|Content-Disposition: attachment; filename="$filename"\n|;
print qq|\n|;
#-- ファイルを読み込んで出力
open(FILE,"$source");
while(<FILE>){print;}
close(FILE);
#--------------------------------------------------------->
上記の結果、ダウンロードはできるのですが、
Acrobatのエラーで、「この文章を開くときにエラーが発生しました。ファイルが壊れています。修復できませんでした。」
というメッセージが表示されます。
PCを変えてみたりもしましたが、どのPCからダウンロードしても同じです。
ちなみに、ウェブサーバーへアップロードする前のpdfは、ちゃんと開きます。
何が原因なのでしょうか？
