☰

Перемещать папки в новые папки, используя часть исходного имени папки с разделителем

tag-icon • tag-icon batch-file
Перемещать папки в новые папки, используя часть исходного имени папки с разделителем

Я пытаюсь переместить папки в новые папки на основе последней части их имени. Разделитель — подчеркивание. Количество подчеркиваний в именах папок сильно различается. Я нашел код, который использует первую часть имени, но не могу понять, как заставить его использовать последнюю часть имени. В awk это будет что-то вроде awk -F'_' {Print $NF}.

@echo off
FOR /D %%G IN (*) DO (
    FOR /F "delims=_" %%H IN ("%%~G") DO (
        MD "%%~H" 2>nul
        MOVE "%%~G" "%%~H"
    )
)

Отредактировано для добавления примеров:

Folder_01 -> md (if necessary) and move into folder "01"
Folder_02 -> md (if necessary) and move into folder "02"
weird_folder_name_a2d -> md (if necessary) and move into folder "a2d"

решение1

Будет ли это ожидаемым результатом:

введите описание изображения здесь

@echo off

if exist "%~1" (IF not exist "%~1\" exit) else (exit)
pushd "%~1"

FOR /D %%a IN (*) DO call :MoveTo "%%~a"
exit


:MoveTo
set "FolderName=%~1"
FOR /F "delims=" %%a IN ("%FolderName:_=\%") DO (
                                                 MD "%%~nxa" 2>nul
                                                 MOVE "%FolderName%" "%%~nxa"
                                                )
goto :EOF

решение2

Вот самый простой способ сделать это с использованием Linux или WSL:

find . -maxdepth 1 -type d -exec perl -e '$a="\Q@ARGV"; $a =~ /([^_]+$)/; `mkdir -p $1 && mv $a $1`' "{}" \;

Взято из:https://askubuntu.com/a/538270

Связанный контент