[Perl] File::Path::mkpath()の恐るべき真実

File::Pathのmkpathで、複数のディレクトリパスを一気に作ってもらおうとすると困りそうなことについてです。make_pathとmkpathはディレクトリパスが複数の場合の扱いに決定的な違いがあります。

make_path($dir1, $dir2, $dir3);      # OK
make_path($dir1, $dir2, $dir3, {});  # OK
mkpath($dir1, $dir2, $dir3);         # NG 【なんと！】
mkpath($dir1, $dir2, $dir3, {});     # OK
mkpath([$dir1, $dir2, $dir3]);       # OK

そもそも、複数のパスを指定できる必要があるのかと思う。

mkpath($_) for ($dir1, $dir2, $dir3);