Исправление sdio, 26.10.13 10:35 (текущая версия) :
rename 's/^([^_]*)__(\d+)__(.*)/$2__$1__$3/' *__*__*
Исходная версия sdio, 26.10.13 10:35:
rename 's/^([^_]*)__(\d+)__(.*)/$2__$1_$3/' *__*__*