Select Code to Download

find({
  preprocess => sub {
...
  },
  wanted => \&processSub,
}, $startDir);

use File::Find::Rule;

...
while(my $thing = $iter->match) {
  ...
}