For more general solutions to renaming files, see Larry's famous rename script and Unix rename faq (a version of Larry's script is given at the end). It's also discussed in Perl Cookbook, recipe 9.9.