perl rename.pl -n "s{(\d+)(?= - \d+\.jpg$)}{ sprintf q(%03d), $1 }e" * +.jpg [download]
In reply to Re: Mass file renaming help by repellent in thread Mass file renaming help by Bastille