Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

I need to rename files using Perl - they are tested to see if they fit certain criteria (this part I have down), and then renamed. The rename needs to take the first character and replace it with another character, leaving the rest of the filename alone.

Ex: Testfile -> Bestfile or something of the sort. Any ideas?