in reply to Re: Misunderstanding Recursion
in thread Misunderstanding Recursion
Huh, looks like I understand these things even less than I thought.
C(qw/74 97 104 112/);sub C{while(@_){$c**=$C;print (map{chr($C!=$c?shift:pop)}$_),$C+=@_%2!=1?1:0}}
In Section
Seekers of Perl Wisdom