bat-файл для запуска сценария perl во всех подкаталогах

Question

У меня есть простой файл bat, который устанавливает каталог и запускает perl в каталоге.

cd Q:\Research\Images(new)\MuseumSpecimens\DBG\DBG_Specimens\DBG_ToBeRenamed
perl Q:\Research\Images(new)\MuseumSpecimens\DBG\DBG_Specimens\zbar\barcode.pl

Я хочу изменить файл bat так, чтобы он запускал скрипт perl в каждом подкаталоге внутрикаталог (каждая папка внутри DBG_ToBe_Renamed) в этом случае. Пока у меня есть следующее, но это не совсем правильно.

FOR /R Q:\Research\Images(new)\MuseumSpecimens\DBG\DBG_Specimens\test\ %%G IN (.) DO perl Q:\Research\Images(new)\MuseumSpecimens\DBG\DBG_Specimens\zbar\barcode.pl

Спасибо, я ценю любую помощь.

Если это поможет, скрипт perl считывает штрих-коды из JPEG и создаетновые файлы с JPEG и ассоциированным файлом RAW, переименованным с использованием значения штрих-кода (https://github.com/psweeney-YU/reBar/blob/master/reBar.pl)

Answer 1

Это должно работать:

for /D %%d in (Q:\Research\Images(new)\MuseumSpecimens\DBG\DBG_Specimens\DBG_ToBeRenamed\*) do pushd %%d && perl Q:\Research\Images(new)\MuseumSpecimens\DBG\DBG_Specimens\zbar\barcode.pl && popd