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