#Does the search in AA and BB only and doesnt touch my web root files
find( \&subsearch, map "$dirs/$_", qw( AA BB ));