perl - 将 Tkx::tk___chooseDirectory() 搜索限制为特定目录

Question

Tkx::tk___chooseDirectory()我有一个允许用户选择目录的 Perl 脚本。

问题是只有少数特定目录对脚本将要执行的操作有效。有没有办法限制此功能显示的文件夹只显示特定子目录下的文件夹？

---

例子：

假设我只想让用户选择“Perl64”或其任何子目录。如何强制它隐藏其他文件夹（如“PerfLogs”或“Program Files”）并仅显示有效文件夹。

我知道我可以使用该-initialdir选项使其从“Perl64”开始，但这并没有隐藏其他选择。