Newsgroups: comp.lang.perl
Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!psuvax1!news
From: flee@cs.psu.edu (Felix Lee)
Subject: Re: Self-reproducing program
Message-ID: <.c5G=2v91@cs.psu.edu>
Sender: news@cs.psu.edu (Usenet)
Nntp-Posting-Host: guardian.cs.psu.edu
Organization: Penn State Computer Science
References: <1991Mar26.210348.12286@uvaarpa.Virginia.EDU>
Date: Wed, 27 Mar 91 00:31:53 GMT
Lines: 14

Here's a shorter non-null self-reproducing program:

print<DATA>x 2 __END__
print<DATA>x 2 __END__

And here's one shorter, but less portable:

open(Z,$0);print<Z>

What's the shortest pair of mutually-reproducing programs?  i.e., two
different programs A and B such that A produces B and B produces A.
Neither A nor B should rely on hard-coded file names.
--
Felix Lee	flee@cs.psu.edu