libfile-find-wanted-perl - 1.00-1.1 main

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 );