條件檔案搜尋和刪除

條件檔案搜尋和刪除

我的一些項目有 15 個圖像,有些項目的 ID 關聯的圖像少於 15 個。我怎麼才能只保留那些有 15 張圖片的呢?

$ ls -l 72065050* | wc -l
15
$ ls -l 71088714* | wc -l
3

$ ls 71088714*
71088714_0.jpg  71088714_1.jpg  71088714_2.jpg
$ ls 72065050*
72065050_0.jpg   72065050_11.jpg  72065050_13.jpg  72065050_1.jpg  72065050_3.jpg  72065050_5.jpg  72065050_7.jpg  72065050_9.jpg
72065050_10.jpg  72065050_12.jpg  72065050_14.jpg  72065050_2.jpg  72065050_4.jpg  72065050_6.jpg  72065050_8.jpg

此外,我如何計算出有多少 ID 具有與其關聯的 15 張圖像?

答案1

未經測試,但您可以執行以下操作:

printf "%s\n" *.jpg | cut -d_ -f1 | sort -u | while IFS= read -r prefix; do
    files=( "$prefix"*.jpg )
    if [[ "${#files[@]}" -ne 15 ]]; then
        echo rm "$prefix"*
    fi
done

這會找到唯一前綴列表,並將每個前綴的文件列表放入一個數組中:如果數組的大小不是 15,則刪除。

答案2

#!/bin/bash
find . -maxdepth 1 -iname '*.jpg' |\
while IFS='' read -r bla; do
  if ! ls "${bla:0:7}"_14.jpg >/dev/null 2>&1; then
    echo rm "${bla:0:7}"*
  fi
done

答案3

另一個可能的答案是:

$ declare -A pref ; for f in *_[0-9]*.jpg ; do p=${f%_*} ; (( pref[$p]++ )); done ; for p in "${!pref[@]}" ; do (( ${pref[$p]} < 15 )) &&  rm "$p"_* ; done

答案4

您也可以使用非 shell 語言來完成此任務:

ruby -e '
  files = Dir.glob("*")
  groups = files.group_by {|f| f.sub(/_.*/, "")}
  groups.each_value {|flist| File.delete(*flist) if flist.length < 15}
'

或者

perl -e '
    foreach $f (glob "*") {
        ($prefix = $f) =~ s/_.*//;
        push @{$groups{$prefix}}, $f;
    }
    foreach $flist (values %groups) {
        unlink @$flist if (scalar @$flist < 15);
    }
'

相關內容