Select Code to Download

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

++$dirs{$File::Find::dir};

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