All in one w/FFR:

  my @files = File::Find::Rule->directory()->exec( sub { ! exists $abs
+_dirs{$_[2]} } )->in( @search );
[download]

I was actually looking at both FFR and File::Finder for this task .. codes comes out pretty similar for both :)