use File::Find::Rule;

my $cnt = scalar find(
  directory =>
  name      => 'class',
  in        => @good_dirs,
);