読者です 読者をやめる 読者になる 読者になる

ディレクトリ

perl

opendir, readdir, closedirを使う。
以下はカレントディレクトリの.logファイルをすべて探してくる例

opendir(THISDIR '.') or die "cannot open dir . $!";
my @allfiles = grep { /\.log$/ and -f } readdir THISDIR;
closedir THISDIR;