perl - perlでパス内のディレクトリを取得する方法

Question

ディレクトリパスがあります：

my $temp = "/a/b/c/d";
my $upDirectory = dirname( $temp );

これは「/a/b/c」を返します。しかし、「c」だけが必要です。それを文字列と比較して、正しいディレクトリかどうかを判断する必要があります。

「/」で分割する以外に方法はありますか？これは使いたくない。Perl コードは、複数のプラットフォームで使用する必要があります。splitdir は役に立ちますか?

Answer 1

もちろん、それを行うには多くの方法がありますが、他のプラットフォームへの移植性が主な関心事である場合は、File::Specがおそらく妥当な賭けです。splitpathとを探しsplitdirます。

Answer 2

必須のPath::Class解決策:

use Path::Class qw(dir);
dir('/a/b/c/d')->parent->dir_list(-1)
# expression returns 'c'