[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [FWP] perl5 is 5



Larry Rubinow <Larry.Rubinow@westgroup.com> wrote:
> Here's a different approach:
> 
> print+("\nHappy birthday ","to you,","dear perl5,","\b.")[0,1,0,1,0,2,0,1,3]

This lends itself to squeezing out 3 more characters, for 73:

print+("dear perl5,","\nHappy birthday ","to you,","\b.")[1,2,1,2,1,0..3]

-- 
Steven Alexander
stevena@teleport.com
<http://www.teleport.com/~stevena/>
perl -le 'print map chr($_?64+((0<=>$_)+(-1+$_**2)**2)%17:()),-2..2'

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe