libfile-find-wanted-perl

More obvious wrapper around file::find
  http://search.cpan.org/dist/File-Find-Wanted/
  0
  no reviews



File::find::wanted provides a find_wanted() function, which does what file::find's find() does but in a more obvious way: to get a list of all files ending in .jpg, simply call

@files = find_wanted( sub { -f && /\.jpg$/ }, $dir );