遷移元を知りたい。

A.htmlとB.htmlの２つのファイルから1つのPerlを呼び出したいと思います。
遷移元により後続の処理が異なるのですが、どのようにすればAから遷移したか、
Bから遷移したかがわかりますか？

Perl＆CGIの初心者なので初歩的な質問かもしれませんが、
よろしくお願いします。

No.3 ベストアンサー 回答者： leaz024 回答日時： 2005/07/06 14:13

単純に考えるならば、CGIへのパラメータとして「どの機能を実行するか」を与えてやればいいような気がします。

例えば、一覧表示とツリー表示ができる掲示板では、
　　bbs.cgi?view=list
または
　　bbs.cgi?view=tree
のような感じで「表示モード（＝どの表示機能を実行するか）」を指定したりします。

同じような感じで、from=A とか from=B とかをパラメータにつけて、
　　if ($in{from} eq 'A') {
　　　　# Aから呼び出されたときの処理
　　}
　　elsif ($in{from} eq 'B') {
　　　　# Bから呼び出されたときの処理
　　}
　　else {
　　　　# エラー（またはデフォルトの処理）
　　}
のような感じで処理分けをしてはどうでしょうか？

No.2 回答者： BLUEPIXY 回答日時： 2005/07/06 14:07

リファラーは取得できないことがあるので、

perl.cgi?CALL=A
とかして、パラメータから調べるといいかもしれません。

No.1 回答者： noname#25358 回答日時： 2005/07/06 13:51

　変数 $ENV{'HTTP_REFERER'} に入ってます。

　ここに入ってなければ、遷移元のサーバーが返してないということなので、どうあっても取得することはできません。