perl - -e と同等の Perl ディレクトリが存在する

Question

-e  File exists.

ディレクトリが存在するためのものはありますか？http://perldoc.perl.org/functions/-X.htmlに表示されなかったので

または、それをテストするための最良の方法は何でしょうか?

next unless (-e $dir . "/dirname");             -e only for file so doesnt work

opendir and grepやり過ぎのように見えるので、dirnameを見つけることを避けようとしています。

更新された質問:
perl concat $dir を行います。-e または -d チェックを行う前に「/dirname」?

Answer 1

テストを使用して-d、指定されたパスがディレクトリかどうかを確認します。その場合、いくつかのファイルシステム オブジェクト-eの存在をテストするため、 も true を返します。

パスがプレーン ファイル (ディレクトリなし、シンボリック リンクなし、特別なファイルなし) を指しているかどうかを確認するには、-f.

あなたが望んでいるのは：

-d "$dir/dirname" or next;