File::Find::Rule

テラヤバスw


#! /usr/local/bin/perl
use strict;
use warnings;
use File::Find::Rule;
use Data::Dumper;
my @files = File::Find::Rule->file()
->name( '*.pm' )
->in( '/usr/target/path/' );
print Dumper(\@files);

こんな感じで、簡単にファイル検索できる。
nameメソッドでワイルドカードを使用できるので、*.pmなんて使い方もできる。
激しく便利。

依存モジュールが少しあるのが難点といえば難点。

でも、テラヤバスw

他にも色々できるぽい。grepまでできそうなので、かなり熱いモジュールですな。