如何在一个Perl命令中创建目录和父目录？

Question

在Perl中,如何创建子目录,同时创建父目录(如果它们不存在)？像UNIX的mkdir -p命令一样？

Answer 1

use File::Path qw(make_path);
make_path("path/to/sub/directory");

不推荐使用的mkpath和首选的make_path来自于此处存档的Perl 5 Porters线程中的讨论.

简而言之,Perl 5.10测试在makepath()接口的参数解析中出现了尴尬.因此它被一个更简单的版本所取代,该版本将哈希作为设置函数选项的最终参数.