If you are willing to write a program that can read one file and figure out what to change its name to, I will write the rest of the program for you.

(If you aren't already reading a good book or tutorial, my Modern Perl is available as a free download.)