PerlでCGIを書いておりますが、特定のＵＲＬ（ディレクトリ）の位置データを取得するには？

質問

PerlでCGIを書いております。
http://test.com/a/test/index.cgiにアクセスしているときに、perlがaを取得して、http://test.com/b/test/index.cgiにアクセスしているときbを取得する良い方法は有るのでしょうか？WindowsとLinuxの両方で動作できれるものがあれば宜しくお願いします。
WindowsとLinuxではディレクトリの感じが違うようなので１個の方法で実現できれば助かります。

回答No.1

Dpop

質問の意図がいまひとつ。。。(^^;)

環境変数 DOCUMENT_ROOT を参照すれば、

a/test/index.cgi が動作している、*本当の*パスを取り出すことができます。
ここから、/a/test/index.cgi を取り出してください。
環境が分からないので、どこから取り出せば良いのか。と言うことは分かりませんが、/public_html より右側にあるものを取得すれば良いのでは無いかな。と思います。

> bを取得

の部分の質問の意図がさっぽり分かりません。
/b/test/index.cgi はどの様に決定される。と言う予定で居られるのか分からないと、アドバイスできません。

また、

> WindowsとLinuxの両方で動作

と言うのは、Webサーバーが、Windows と Linux にインストールされている。と言う意味でしょうか?
サーバーの種類が分かりませんが、環境変数 DOCUMENT_ROOT が参照できる可能性が高いと思いますし、、/public_html より右側にある文字列を、パスとして取得すれば良いのだと思います。