find ({wanted => \&wanted, no_chdir=>1}, $dir1);