in reply to How do I do character substitution on strings stored in a variable
http://www.cpan.org/authors/id/F/FO/FORMAN/ren-regexp-1.5
I also found (but have never used) a similar CPAN module: File::Rename
There is also: How do I do a bulk rename?