請教大神shell如何刪除一個文本文件中沒有列出的所有文件夾

jiawei2426

我有一個文本文件列出了所有需要的問價夾，格式如下：
AAA
BBB
CCC
然后在我的路徑下有很多文件夾，例如：
AAA BBB CCC DDD EEE  FFF ...... ZZZ
請教大神shell如何刪除一個文本文件中沒有列出的所有文件夾?

wh7211

回復(fù) 1# jiawei2426

1. cat 1
   
2. AAA
   
3. BBB
   
4. CCC
   
5. 
   
6. awk '{a[$1]++}END{while(("ls -p"|getline b)>0){if(b~/\/$/){sub(/\//,"",b);if(!a[b]){system("rm -rf "b"")}}}}' 1

復(fù)制代碼

legs

給你個另一種解法：

1. perl -lnE'--$h{$_}}{++$h{$_}&&-d&&`rm -rf $_`for<*>' x.txt

復(fù)制代碼

Shell_HAT

回復(fù) 1# jiawei2426


test-1.sh

1. #!/bin/bash
   
2. FileList="1.txt"
   
3. for ThisFolder in `ls -1p | grep '/`; do
   
4.     grep -x -q "${ThisFolder:0:-1}" $FileList
   
5.     if [ $? -ne 0 ]; then
   
6.         rm -rf "$ThisFolder"
   
7.     fi
   
8. done

復(fù)制代碼

Shell_HAT

回復(fù) 1# jiawei2426


test-2.sh

1. #!/bin/bash
   
2. FileList="1.txt"
   
3. FileTemp="/dev/shm/1.tmp"
   
4. ls -1p | grep '/' | sed 's#/##' > $FileTemp
   
5. for ThisFolder in `grep -vxFf $FileList $FileTemp`; do
   
6.     rm -rf "$ThisFolder"
   
7. done

復(fù)制代碼