オブジェクト作成の順番

質問

こんにちは。Perlについて教えていただきたいことがあります。

こう書くと$temp_pathに値が入ります。
-----------------------------------
my $e = CGI->new();
my $q = CGI->new();

my $fh = $e->upload('file');
my $temp_path = $e->tmpFileName($fh);
-----------------------------------

こう書くと$temp_pathに値が入りません。
-----------------------------------
my $q = CGI->new();
my $e = CGI->new();

my $fh = $e->upload('file');
my $temp_path = $e->tmpFileName($fh);
-----------------------------------

tmpFileNameは最初に作成されたオブジェクトでないとならないような
仕様があるのでしょうか？
それとも、他に原因があるのでしょうか？

どうかよろしくお願いします。

回答No.1

_--_1l1_1_ · ベストアンサー

CGIスクリプトにはWebサーバから標準入力(STDIN)でデータが渡されます。
そうじゃないのもありますけど。

CGI->new()とすると標準入力から読み取ろうとします。
CGI->new()を二つ実行すると、一つ目のCGI->new()が標準入力を掴んで、
二つ目のCGI->new()ではパラメータが取れません。
したがって、通常CGI->new()は一つだけ生成します。

一方のCGI->new()はhtml生成用などで、パラメータを取ったりアップロードファイルを読んだりする必要がないときは、
CGI->new("");
などとすることで、標準入力を掴まないCGIオブジェクトを生成できます。

お礼

参考になりました。
ありがとうございました。

補足

1つ目しかパラメータが取得できないのですね。
$qも別の処理に使っているのですが、入力した値をとるような処理ではないため
2つ目に作成されても問題なく動いたんですね。

お手数をお掛けして大変申し訳ないのですが、
1つ目しかパラメータの取得が出来ないことについて書かれた資料はご存じないでしょうか？