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

RE: [FWP] perl5 is 5



Please accept the ugliest possible solution:

$a="to you.";$c="dear Perl5,";map{print"Happy birthday $$_\n"}(a,a,c,a);

I challenge anyone to come up with worse code in 72 characters. :)

-e


At 01:48 PM 10/19/99 , you wrote:
>
>Sorry but I couldn't help myself:-) Not that it's very nice but...
>
>$a="Happy birthday";print "$a to you,\n"x2,"$a dear perl5,\n$a to you.\n";
>
>is actually 6 chars shorter :-)
>Cheers,
>/Jan-Erik Schuch
>jsc@avanza.com
>
>Avanza Securities
>http://www.avanza.com
>http://www.insidefinans.se
>
>Phone: +46 8 566 183 20  Mailing Adress:     Visiting Address:
>Cell:  +46 707 68 08 50  P.O Box 1399        Kungsgatan 28
>Fax:   +46 8 566 183 01  S-111 93 Stockholm  Stockholm, Sweden
>


-- 
Q: How does a quantum logic chicken cross the road?
A. The chicken is distributed probabilistically on
   all sides of the road until you observe it on 
   the side of your choice.
   
*------------------------------------------------------*
*    eric von zee     *------* tritech marketing inc.  *
*   web  developer    *------* evonzee@tritechnet.com  *
*  www.tritechnet.com *------*   630.654.0170 x 129    *
*------------------------------------------------------*


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