ディレクトリ内のファイル一覧

---

　opendirでディレクトリをオープンし、readdirで読み込み、closedirで閉じます。

my $dir = '/home/user1'; # 対象ディレクトリ名(相対パスでもOKです)

opendir my $dh, $dir or die "$dir:$!";
while (my $file = readdir $dh) {
    next if $file =~ /^\.{1,2}$/; # '.'や'..'も取れるので、スキップする
    print $file, "\n";
}
closedir $dh;

　readdirはリストコンテキストではすべてのエントリを返します。

my @files = readdir $dh; # @filesにすべてのエントリが入る

---

関連項目

・closedir関数
・glob関数
・opendir関数
・readdir関数
・rewinddir関数
・ディレクトリ配下のファイル一覧
・ディレクトリ配下のファイル一覧(Windows用)