Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!cs.utexas.edu!samsung!umich!sharkey!cfctech!rphroy!tkacik From: tkacik@rphroy.UUCP (Tom Tkacik) Newsgroups: comp.lang.perl Subject: Re: shortest self-reproducing Perl program Message-ID: <22584@rphroy.UUCP> Date: 22 Mar 90 16:51:51 GMT References: <1990Mar20.203516.8429@iwarp.intel.com> <15274@bfmny0.UU.NET> Reply-To: tkacik@rphroy.UUCP (Tom Tkacik) Organization: GM Research Labs, Warren, MI Lines: 17 In article <15274@bfmny0.UU.NET> tneff@bfmny0.UU.NET (Tom Neff) writes: >Well this works slightly differently: > #! /usr/bin/perl > system "cat $0"; Let's take this one to the extreme. And we don't even need perl ;-(. Just put the following line in the file junk, and make it executable. #!/bin/cat junk -- Tom Tkacik GM Research Labs, Warren MI 48090 uunet!edsews!rphroy!megatron!tkacik Work Ph: (313)986-1442 "Csh must go. This is non-negotiable!"