У меня есть некоторые предметы, которые имеют 15 изображений, а некоторые имеют менее 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
Кроме того, как я могу определить, сколько из этих идентификаторов имеют 15 изображений, связанных с ними? ?
Не проверено, но вы можете сделать что-то вроде:
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, затем удалите.
#!/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
Другой возможный ответ:
$ 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
Вы также можете использовать язык без оболочки для этой задачи:
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);
}
'