Удаление всех папок кроме 30-ти последних

[__sa__nya]

Доброе время суток. Не могу написать батник который бы удалял все папки (вместе с подпапками и файлами)- из заданной папки кроме 30-ти последних по дате создания. Есть у кого-нибудь мысли?

[megaloman]

@Echo Off

Set Where=D:\DDDDD

FOR /F "usebackq skip=30 delims=" %%d IN (`dir "%Where%\" /b /A:D /O:-D /T:C`) DO (
rd "%Where%\%%d" /s /q
)