$dirs{$File::Find::dir} = 1;