上位階層のディレクトリパスを取得する方法

Perlで、あるディレクトリの１つ上のディレクトリパスを
取得する方法を教えていただけないでしょうか。
Perlは初心者ですので、わかりやすくお願いします。

よろしくお願いいたします。

No.1 ベストアンサー 回答者： Ceren 回答日時： 2007/07/05 18:29

「あるディレクトリ」が絶対パスならばあまり悩むことはなさそうなので、相対パスであることも考慮すると

use Cwd;
$path = Cwd::abs_path("あるディレクトリ" . "/..");

安易な手ですが、こんな感じで取得できると思います。

この回答へのお礼

アドバイス、本当にありがとうございます。
無事、取得できました。

お礼日時：2007/07/05 19:21