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

Re: [FWP] perl5 is 5



On Tue, 19 Oct 1999 17:46:52 +0100 (BST), you wrote:

> perl5 is 5.
> 
> So in the spirit of JAPH:
> 
> for(0..3){print"Happy birthday ".(/2/?"dear perl5":"to you").(/3/?".":",")."\n"}
> 
> Can anybody get it smaller...

2 characters shorter:

print"Happy birthday ".(?2??"dear perl5":"to you").(?3??".":",")."\n"
for 0..3


Or for something completely different:

print$h='Happy birthday',$t=' to you',",\n$h$t,\n$h dear
perl5,\n$h$t.\n";

That's another 4 characters shorters, so saved 6 in total.


-- 
Marcel, Perl Padawan
sub AUTOLOAD{$_=$AUTOLOAD;s;.*::;;;y;_; ;;print}&Just_Another_Perl_Hacker;

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