Perl-CGIで、重い処理をさせるときに、その重い処理の間、
「ただいま処理中です」
と表示させておいて、処理が完了したら別ページに飛ばす
(処理完了が書かれたHTMLを表示する)
というCGIを作りたいと思っているのですが、
どうもうまくいきません。。

バッファのフラッシュを考えたのですが、
最後に別ページを表示するので、ちょっと違うかなと思いました。。

こんなイメージです。

print "Content-Type:text/html\n\n";
print "loading...";
sleep(10); # ここが重い処理と想定
print "Location:$URL\n\n";
exit;

この通りではいかないのはわかっておりますが、
他に方法がないものかと思っております。。。

この処理自体、Perl-CGIではできなかったりしますかね(汗