Re: [FWP] [OT] Befunge rocks.

[Ilmari Karonen <iltzu@sci.fi>]

On Sun, 3 Dec 2000, Jeff Pinyan wrote:
> 
> Here's the shortest (non-empty) Perl quine I know of:
> 
> open+0;print<0>
> 
> That's kinda cheap, since it reads its source from the filesystem.

The shortest non-cheating Perl quine I know of is:

  printf+(q(printf+(q(%s))x2))x2

30 chars total.  Came up with it all by myself, too.  I'd have though
something that short would've been invented independently several times,
but so far I haven't found any prior examples.

-- 
Ilmari Karonen - http://www.sci.fi/~iltzu/
"Languages trail anachronisms like flotsam."  -- Ian A. York in r.a.sf.c



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