処理終了後、他のプログラムへPOST方式でsubmitする方法

質問

処理終了後、他のプログラムへPOST方式でsubmitする方法はないでしょうか。
GET方式を使えば出来ますが、POST方式で値を渡したいのですが、可能でしょうか。
(JavaScriptは使わず。）

回答No.3

Head_Syndicate · ベストアンサー

なるほど、片方がPHPでしたか。それではやむを得ないかもしれませんね。

一応お書きになったような内容で、当方の環境だと成功するのですが…。
write.cgiを呼び出すopenが失敗しているのかもしれません。失敗するとdieで
そのエラーメッセージを出力してますが、これはサーバのerror_logに出力
されるので、ブラウザからでは確認できませんね。失礼しました。
ではstart.cgiを以下のように修正してみてはどうでしょう。

#!/usr/local/bin/perl

$param = 'a=123&b=xyz';
$ENV{CONTENT_LENGTH} = length($param);
$ENV{REQUEST_METHOD} = 'POST';

print "Content-type: text/html\n\n";

open(OTHER_CGI, "|./write.cgi") or print "error: $!";
print OTHER_CGI $param;
close(OTHER_CGI);

print "success!";

要するに成功したらsuccess、失敗したらerror:でエラーメッセージを
出すようにしたわけです。Content-typeヘッダの後じゃないとちゃんと
出力されないのでその行も上に移動させてください。

ひょっとすると、CGIが実行されるときのカレントディレクトリが
違うのかもしれませんね。./write.cgiをフルパス、すなわち
例えば/my/home/directory/にあるのでしたら
「/my/home/directory/write.cgi」として指定してみてはどうでしょう？
（URLではこの場合ダメです）

補足

出来ました！！　どうやらwindows上で行っていたのが原因のようで、
linux　で行ったところ、success表示とともに、ファイルが生成されました。
そして、変数の受け渡しも出来ました！！
詳しい説明、どうもありがとうございました。