とあるサイトのマルチパートリクエストの使用事例をそのまま使って153KB程度のGIFファイルをアップロード実験してみましたら、処理後ブラウザで「cgi-lib.pl: Request to receive too much data: 153345 bytes 」と表示されアップロードされません。表示の意味と、どうすればアップロードできるかを教えてください。 ● サンプルＨＴＭＬファイルアップロード ● サンプルＣＧＩ require "cgi-lib.pl"; &ReadParse; $upload = $in{"upload"}; # ファイル内容を取得 $name = $incfn{"upload"}; # ファイル名を取得 $name =~ s/\\/\//g; # パス区切り文字を/に変換 $name = substr($name,rindex($name,"/")+1); # ファイル名のみを取得 if($upload ne "" && $name ne ""){ open(FILE,">$name"); binmode(FILE); print FILE $upload; close(FILE); }

バイナリファイルのアップロード

解決済

質問者：souta_n
質問日時：2004/10/15 18:43
回答数：2件

とあるサイトのマルチパートリクエストの使用事例をそのまま使って153KB程度のGIFファイルをアップロード実験してみましたら、処理後ブラウザで「cgi-lib.pl: Request to receive too much data: 153345 bytes 」と表示されアップロードされません。表示の意味と、どうすればアップロードできるかを教えてください。
●　サンプルＨＴＭＬ
<html>
<head><title>ファイルアップロード</title></head>
<body>
<form method="POST" action="upload.cgi" enctype="multipart/form-data">
<input type="file" name="upload">
<input type="submit" value="送信">
</form>
</body></html>

●　サンプルＣＧＩ
require "cgi-lib.pl";
&ReadParse;

$upload = $in{"upload"}; # ファイル内容を取得
$name = $incfn{"upload"}; # ファイル名を取得

$name =~ s/\\/\//g; # パス区切り文字を/に変換
$name = substr($name,rindex($name,"/")+1); # ファイル名のみを取得

if($upload ne "" && $name ne ""){
open(FILE,">$name");
binmode(FILE);
print FILE $upload;
close(FILE);
}

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

No.2ベストアンサー

回答者： kalze
回答日時：2004/10/15 18:52

cgi-lib.plは受信するデータのサイズの上限を設定するcgi_lib'maxdataという変数があります。

上記エラーメッセージは
$ENV{'CONTENT_LENGTH'} > cgi_lib'maxdata
となったときに表示されるメッセージです。

テストに使うファイルをサイズの小さいものに変更するか、上限の設定を変更してください。

ちなみにもし設定していなければ、
131072byte
に設定されています。

この回答への補足

わかりました。
kalzeさんの言っていたcgi_lib'maxdataの上限を変更してください・・・という記述で、cgi-libをテキストエディタでこわごわ開いたらどこを直すかすぐに分かりました。
初心者なのでライブラリの記述を書き換えるなんて恐ろしいこと考えたこともなかったです。
こんなことも場合によってはするんですね、いや勉強になりました。

補足日時：2004/10/15 19:22

通報する