1::-*- batch -*- 2@echo off 3if "%1" == "-p" shift 4:begin 5if "%1" == "" goto :end 6 set dir=%1 7 shift 8 set dir=%dir:/=\% 9 :rmdirs 10 if not exist "%dir%\." goto :begin 11 if "%dir%" == "." goto :begin 12 if "%dir%" == ".." goto :begin 13 rd "%dir%" 2> nul || goto :begin 14 :trim_sep 15 if not /%dir:~-1%/ == /\/ goto :trim_base 16 set dir=%dir:~0,-1% 17 if not "%dir%" == "" goto :trim_sep 18 :trim_base 19 if /%dir:~-1%/ == /\/ goto :parent 20 set dir=%dir:~0,-1% 21 if not "%dir%" == "" goto :trim_base 22 :parent 23 set dir=%dir:~0,-1% 24 if "%dir%" == "" goto :begin 25 if "%dir:~-1%" == ":" goto :begin 26 goto :rmdirs 27shift 28goto :begin 29:end 30