我如何從Perl獲取路徑中的程序列表？

Question

如何列出Perl中所有可用的UNIX命令？

Answer 1

perl -MFile::Find -le 'find sub {print if -f and -x _}, split ":", $ENV{PATH}'

這段代碼在路徑中的每個目錄（ split ":", $ENV{PATH} ）中查找可執行文件（ -x ）的文件（ -f ），並打印找到的文件。 您可能需要閱讀有關

• 文件：：查找
• 分裂
• ％ENV
• 文件測試運算符

不搜索PATH目錄的子目錄的替代方法是

perl -le '-f and -x _ and print for map { glob "$_/*" } split ":", $ENV{PATH}'