@n{@l=(_,a..z,'.')}=0..27;@c=@n{pop=~/./g};$"=my$i;$p[$_[0]*$i++%@c]=$ +l[($_+$i)%28]for@c;"@p"
larryk perl -le "s,,reverse killer,e,y,rifle,lycra,,print"
In reply to Re: (dkubb) Re: (2) (Golf) Untwist
by larryk
in thread (Golf) Untwist
by ebbeatty
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |