http://qs321.pair.com?node_id=591590


in reply to Re: Arguments explained (sort of.)
in thread (Subroutine) Arguments explained (sort of.)

Glad to know that I am not the only one.
Perhaps there should be a "Seekers of Common Knowledge" section...
C(qw/74 97 104 112/);sub C{while(@_){$c**=$C;print (map{chr($C!=$c?shift:pop)}$_),$C+=@_%2!=1?1:0}}