在Windows中递归删除空目录

我的Windows 7计算机上有一个目录，该目录具有数百个（如果不是数千个）子目录。其中有些文件，有些则没有。我要删除所有空目录。

查看del和rmdir DOS命令，您似乎可以递归地执行此操作而不删除所有文件。有没有办法从命令行执行此操作？

您可以使用“ 删除空目录”实用程序。

或者，您可以使用此单行批处理文件（来自DownloadSquad）：

for /f "delims=" %d in ('dir /s /b /ad ^| sort /r') do rd "%d"

（如果在批处理文件中使用，请替换%d为%%d）

之所以rd可行，是因为不会删除包含文件的目录。

您也可以使用ROBOCOPY。这非常简单，还可以用于删除大型层次结构中的空文件夹。

ROBOCOPY folder1 folder1 /S /MOVE

这里的源和目标都是folder1，因为您只需要删除空文件夹，而不是将其他文件移动到其他文件夹。/S选项是跳过复制（在上述情况下移动）空文件夹。由于文件在同一驱动器内移动，因此速度也更快。

由于Cygwin随附GNU find，因此您可以执行以下操作：

find . -type d -empty -delete

或为了避免文件夹不再存在时的噪音：

find . -type d -empty -execdir rmdir {} +

免费的EmptyFolderNuker实用程序可以从您选择的基本文件夹中完成此操作。它还会删除那些仅包含空子目录的目录。

如果安装了Cygwin，则可以执行以下操作：

find -type d -exec rmdir {} \;

如果您在emacs中工作（使该平台不可知），则可以进行以下工作：

(defun *-delete-empty-directories (root-directory)
  "Recursively delete empty directories in ROOT-DIRECTORY.

When called from dired, `dired-current-directory' is used for
ROOT-DIRECTORY."

  ;; Interface
  (interactive (list (if (eq major-mode 'dired-mode)
                         (expand-file-name (dired-current-directory))
                       (read-from-minibuffer "Root directory: "))))
  (when (or (null root-directory) (string= "" root-directory))
    (user-error "No root directory provided"))
  (when (called-interactively-p 'interactive)
    (unless (yes-or-no-p (format "Delete all non-empty directories in `%s'? "
                                 root-directory))
      (user-error "Directory `%s' has been left untouched" root-directory)))

  ;; Implementation
  (require 'f)
  (let ((entries (f-directories root-directory)))
    (while entries
      (let ((curdir (car entries)))
        (when (f-directories curdir)
          (*-delete-empty-directories curdir))
        (unless (f-entries curdir)
          (delete-directory curdir)
          (message "Directory deleted: `%s'" curdir))
        (setq entries (cdr entries)))))

结合Gareth和G-Man的帖子：

find . -depth -type d -empty -execdir rmdir {} +

编辑：但是由于在我的PATH变量中存在“ C”，因此产生了安全错误...

$find . -depth -type d -empty | while read dir; do (rmdir -v $dir); done

我不使用xargs，因为它似乎有一个输入行限制（我认为大约是1024行），而

 while read x; do (command $x); done

只要有输入就一直持续下去。如果您不想看到结果和/或希望它运行得更快，请省去“ -v”详细标志。

嗯...也许更简单的解决方案：

for /d /r %d in (*.*) do rd "%d"

从要删除空文件夹的文件夹开始。

/ d-适用于文件夹，不适用于文件/ r-递归子目录