Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
ダウンロード用CGI
2 views
Skip to first unread message
Ikeji
Aug 1, 1999, 3:00:00 AM8/1/99
to
ダウンロード用のＣＧＩがほしいのですが、
見つけることができません！
見つけることができません！
どなたかご存じの方はいらっしゃいませんか？
また、下のようなものを作ったのですが、うまく動きません。
#!/user/local/bin/perl
# ************** file.cgi *************
$filename = "./file.lzh";
if( !open( FH , "$filename" ) ){
printf "Content-type: text/html\n\n";
print "<HTML><BODY>\n";
print "なんか、しんないけどファイルオープンエラーだとさ<BR>\n";
print "</BODY></HTML>\n";
exit( );
}
print "Content-Type: application/octet-stream\r\n";
print "Content-Disposition: attachment; filename=\"file.lzh\"\r\n";
print "\r\n";
@list = <FH>;
print @list;
__END__
ブラウザでは、サーバーエラー５００と表示されます。
誰か教えてください。
お願いします。
使っているのはフリーウエーブです。
Yasuhiro Tanikawa
Aug 2, 1999, 3:00:00 AM8/2/99
to
In article <7o0uhq$1le$1...@newsjp.mbn.or.jp>, ik...@ba.mbn.or.jp says...
(snip)
>また、下のようなものを作ったのですが、うまく動きません。
>
>#!/user/local/bin/perl
(snip)
>また、下のようなものを作ったのですが、うまく動きません。
>
>#!/user/local/bin/perl
「perlのPATHが違う。」に一票。
----
mike
0 new messages