For a while, all the winning solutions on the Perl golf site (not available, last I checked :-() were substitutions-within-substitutions. So my conjecture is that this comes from a golf. Or someone who is very golf-oriented.