디렉토리에서 모든 .XXX 파일을 검색하고 Perl에서 그 목록을 가져 오는 방법은 무엇입니까?

Question

.123으로 끝나는 모든 파일을 디렉토리에서 검색해야합니다.

어떻게하면 (Perl을 사용하여) 그 파일들의 목록을 얻을 수 있습니까? 간단히

Answer 1

:

@files = glob "$dirname/*.123"; 

Answer 2

한 가지 방법은 glob을 사용하는 것입니다

use warnings; 
use strict; 

my @files = grep { -f } glob '*.123'; 

Answer 3

glob이 작업을 수행해야합니다.
재귀 적으로 검색하려면 File::Find을 사용할 수 있습니다.