Я мог бы предположить, что пакет DOS не является подходящим инструментом для этой работы, потому что он не имеет встроенных средств для работы со строками, как это потребуется.
Если у вас есть Perl, вы можете сделать что-то вроде этого:
#!/usr/bin/perl -w
while (<>) {
s/\\[^\\]*$//; # this removes a the last backslash and anything after it
mkdir $_;
}