http://qs1969.pair.com?node_id=115342

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

How would I uppercase every other letter in the alphabet?
@lcase = (a..z); @upcase = map { uc() } @lcase;
But I don't want to uppercase all the letters I only want: AbCdEfG