How 'bout using MPEG::MP3Info to obtain the song name stored in the MP3 tags, apply your transformation and use that as the file name?

Have fun,
Carl Forde