Переместить файлы.

Сессия вроде же закончилась. К чему это?

Но я уверен - если вы предложите $100 - $1000 (да что уж там - тут есть деятели предлагающие услуги аж за баснословные 20р/час, но боюсь вас с их решениями могут и отчислить) - желающие найдутся…

Можете накидать bash скрипт?

В Job.

Сессия вроде же закончилась. К чему это?

Сессия может быть у кого и закончилась, а мне в обиходе требуется такой скрипт.😊

Открой Вильяма Шоттса, там есть практически готовое решение на твой вопрос в главе, где обсуждаются подстановки.

а мне в обиходе требуется такой скрипт.

Расскажите поподробнее, плз. А то мне сложно представить зачем может понадобиться резать именно по тысяче файлов, без всяческих дополнительных ограничений (привязке к какому-нибудь hash’у итд).

Хорошо, расскажу. Есть много фотографий. Пользуюсь просмотрщиком Gwenview. Когда несколько десятков тысяч файлов в одной папке, просмотрщик очень долго превьюшки генерит. А когда в папке тысяча-две фотографии, то приемлемо.

Спасибо.

Хорошо, расскажу. Есть много фотографий. Пользуюсь просмотрщиком Gwenview. Когда несколько десятков тысяч файлов в одной папке, просмотрщик очень долго превьюшки генерит. А когда в папке тысяча-две фотографии, то приемлемо.

Ну может их тогда не тупо ровно по 1000 сортировать, а с хоть каким-нибудь смыслом? Например, по дате. Не? Ну там, отдельный каталог на каждый месяц, например. Или по сколько там выходит.

Может Вы хотите к датам привязаться? Ie раскидать по YYYY/MM (например)? Это бы хоть какой-то практический смысл имело. Причём в идеале даты можно из exif выгрызать…

Mid-air clash :)

Нет, такой критерий мне не нужен. Раскидывание по 1000 файлов в папку- чтобы уменшьшить тормоза при предпросмотре фото (i/o нагрузку).

Я уверен, помощь придёт, но в такой постановке - скучновато, могут быть проблемы с мотивацией потенциальных исполнителей.

ПыСы. А почему именно shell? Я бы такое на perl’е писал. Тривиально делается. Главное про «хвост» не забыть.

Спасибо ребятам за вдохновление. Почитал западные форумы, и успешно заколхозил вот такое. Сработало.

#!/bin/bash dea=$(find ./ -maxdepth 1 -type f | wc -l) cycles=$(( dea / 1000 )) for ((k=0;k<=cycles;k++)); do dername=$(cat /dev/urandom | tr -dc ‘a-zA-Z0-9’ | fold -w 4 | head -n 1) mkdir ./«$dername» find . -maxdepth 1 -name ‘*.jpg’ | head -n 1000 | xargs -d $‘\n’ > mv -t ./«$dername» done

покуда пил кофе :

package require uuid
proc generate_preview { dir } {
  set owd [ pwd ]
  cd $dir
  exec -ignorestderr -- magick montage -label '%f'  *.jpeg \
          -tile x1 --shadow -geometry '60x60+2+2>'  \
          preview.jpeg
  cd $owd
}
set stride 1000
set list [ glob -nocomplain -types f -- {*.[Jj][Pp][Ee][Gg]} ]
set total [ llength $list ]
set maps {}
for {set n 0 } { $n < $total } { incr n } {
   set name [ lindex $list $n ]
   set dir [ expr int(n/$stride) ]
   if { $n % $stride == 0 && ! [ file exists $dir ] } {
      file mkdir $dir
   } 
   set oid [ uuid::uuid generate ]
   set target [ file join $dir ${oid}.jpeg ]
   file rename -- $name $target
   if { $n % $stride == $stride - 1 } {
      generate_preview $dir
   }
   lappend maps [ list $name $target ]
}
if { [ info exists dir ] && ( $n % $stride != $stride - 1 ) } {
   generate_preview $dir
}
puts [ join $maps \n ]