perl - 如何在一个 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 线程中的讨论，该线程已存档 here .

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