AN HTTPD ゲストブック/コメント集(2002年3月30日05:26)

ご苦労様です。

実験は1.39fでOSはXPです。

localから巨大なファイルのアップロードの際
perlでソース、

ループ（ファイルを読み込むまで）｛
read(STDIN,$bufff,1048576);
｝大略

とすると、HDDのランプが点きっぱなしになり終わりません。
(環境によるかもしれませんが)
しかし

ループ（ファイルを読み込むまで）｛
seek(STDIN,0,1);
read(STDIN,$bufff,1048576);
｝大略
すると、上手くいったりします。
(seekやtellはSTDIN等に使うのは好ましくないも知れません)
(apacheやiisでは上手く行きません)

実験ではlocalからアップロード1.2Gまで成功を確認してます。
でも、SEEKしないと上手くいきません。
報告でした。