perlで*.lzhファイルをダウンロードさせるには?

[上に] [前に] [次に]
KLAUS [E-Mail] 1999/06/29(火) 22:48:03
はじめまして、KLAUSと言います.

lzhファイルのダウンロード数をカウントさせるために、
perlでカウントして、
  printt "Location: http://〜〜"
としています.
しかし、たまにhtmlとしてブラウザに表示されるときがあります.

perlで、lzhやzipファイルをブラウザにダウンロードさせるには、
 どの様にすれば1番よいのでしょうか?

皆さんのアドバイスよろしくお願いします.

B-Cus 1999/06/30(水) 13:58:22
うまくいくかはわかりませんが、Content-type を application/x-lzh か
application/octet-stream に設定してはどうでしょうか。

KLAUS [E-Mail] 1999/07/01(木) 01:04:09
B-Cusさん、レスありがとうございます.
早速、やってみましたが、*.lzhファイルがダウンロードされずに、
 perlファイル自体がダウンロードされます.
 (なぜなんだろ...?)

レスお待ちしてます..

B-Cus 1999/07/01(木) 01:09:00
.htaccessに
 AddType application/x-lzh .lzh
と書いて、CGI側は print "Location: .." としておくか、
あるいはCGI側を
 print "Content-type: application....\n\n";
 open(IN,"hoge.lzh");
 print <IN>
としてはどうか、ということです。

KLAUS [E-Mail] 1999/07/02(金) 01:08:20
[[解決]]
B-Cusさん、ありがとうございます.

print "Content-type: application-z-lzh\n\n";
open(IN,"〜.lzh");
print <IN>;

で、行けました.

ありがとうございました.

KLAUS [E-Mail] 1999/07/02(金) 01:09:14
[[解決]]
B-Cusさん、ありがとうございます.

print "Content-type: application/z-lzh\n\n";
open(IN,"〜.lzh");
print <IN>;

で、行けました.

ありがとうございました.

KLAUS [E-Mail] 1999/07/02(金) 01:10:35
[[解決]]
すいません.
print "Content-type: application/x-lzh\n\n";
ですね.

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