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

RE: [FWP] print thyself [golf]



> From: Clifford Hammerschmidt [mailto:cliff@marketingtips.com]
> Sent: Friday, April 28, 2000 10:04
> To: fwp@technofile.org
> Subject: [FWP] print thyself [golf]
>
>
> Hi all,
>
> We had a little competition at my work to come up with the shortest
> (non-empty) perl script that could print itself. The winner (Jeff
Anderson)
> came up with:
>
> $_=q(print "\$_=q($_);eval");eval
>
> Can anyone come up with a shorter one?

This is nothing new.  A Google search for 'Perl quine' turned up 147
references.

--
Larry Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com



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