「Path::Class」の版間の差分

提供: dsk's note
移動: 案内検索
(ページの作成:「#ディレクトリ配下にあるファイルリストを作成(再帰的) <syntaxhighlight lang="perl"> my @files; Path::Class::Dir->new("/home/dsktnk/www/")->recur...」)
(相違点なし)

2015年5月11日 (月) 17:02時点における版

  1. ディレクトリ配下にあるファイルリストを作成(再帰的)
my @files;
Path::Class::Dir->new("/home/dsktnk/www/")->recurse(
    callback => sub {
        my $file = shift;
        return if $file->is_dir; #ディレクトリはスキップ
        push(@files, $file);
    },
);