Переименовать файлы относительно названию папки

Допустим, есть папки с названиями 001, 002, 003 и т.д. в них есть абсолютно разные файлы с разными названиями. 
Нужно как-то автоматизированно переименовать все эти файлы во всех папках в соответствии с названием соответствующей папки. 
Чтоб все стали 001-1.* 001-2.*  002-1, 002-2...и т.д.?
Папок много, как и файлов в этих папках. Про F2 знаю, каждую папку обходить не хотелось бы. 
Напишите, что, как и сколько?  Заранее спасибо.