http://www.perlmonks.org?node_id=115360


in reply to Re: uc() every other letter
in thread uc() every other letter

Oooh. Bonus points for the obfuscated use of a hash to break out the alternate letters!

In Section Seekers of Perl Wisdom