Perl has shipped with a `rename` utility for ages, that you can use like:

    rename 's/foo/bar/' *.ext

Of course you have to know Perl...