将Tkx :: tk ___ chooseDirectory（）限制搜索到特定目录

Question

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

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

示例：

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

我知道我可以使用-initialdir选项让它在“Perl64”上启动，但这并不会隐藏其他选择。