「Path::Class」の版間の差分
提供: dsk's note
(ページの作成:「#ディレクトリ配下にあるファイルリストを作成（再帰的） <syntaxhighlight lang="perl"> my @files; Path::Class::Dir->new("/home/dsktnk/www/")->recur...」) |
細 |
||
| 1行目: | 1行目: | ||
| − | + | ===ディレクトリ配下にあるファイルリストを作成（再帰的）=== | |
<syntaxhighlight lang="perl"> | <syntaxhighlight lang="perl"> | ||
my @files; | my @files; | ||
2015年5月11日 (月) 17:02時点における版
ディレクトリ配下にあるファイルリストを作成（再帰的）
my @files; Path::Class::Dir->new("/home/dsktnk/www/")->recurse( callback => sub { my $file = shift; return if $file->is_dir; #ディレクトリはスキップ push(@files, $file); }, );
