in reply to Changing case inside substitution

Thanks everybody, I've already learned a ton.
s-t

In Section Seekers of Perl Wisdom