獲取目錄中所有文件的名稱（Perl）

Question

獲取給定目錄中所有文件的全名列表（包括子目錄中的文件）的最簡單方法是什麼？

是的，我知道File::Find模塊。但有沒有更簡單的方法？

Answer 1

的File::Find::Rule是一個非常有用的工具

perl -Mstrict -MFile::Find::Rule -wE' 
    my @all = File::Find::Rule->in("."); 
    say for @all 
' 

你可以先獲取對象my $ffr = File::Find::Rule，然後在其上設置的規則。

的Path::Tiny->iterator是非常好的，以及，對於「懶洋洋地」走一棵樹

perl -Mstrict -MPath::Tiny -wE' 
    my $iter = path(".")->iterator({recurse => 1}); 
    while (my $path = $iter->()) { say $path } 
' 

在那裏你可以很方便地詢問遇到的內容。該模塊有許多其他用途和文件系統工作的便利，這幾乎是一個「側面」功能。

Path::Iterator::Rule似乎也值得一試，因爲這兩個功能和易用性。