my $file_info = stat($File::Find::name);
        $dirs{$File::Find::dir}{size} += $file_info->size;