Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!sdd.hp.com!elroy.jpl.nasa.gov!ames!haven!mimsy!mojo!ziegast
From: ziegast@eng.umd.edu (Eric W. Ziegast)
Newsgroups: comp.lang.perl
Subject: Re: Perl-Users Digest #673
Message-ID: <1991Apr1.042852.4350@eng.umd.edu>
Date: 1 Apr 91 04:28:52 GMT
References: <1991Mar31.205115.10270@uvaarpa.Virginia.EDU>
Sender: news@eng.umd.edu (C-News)
Organization: University of Merryland, Engineering Computing Services
Lines: 29

bjaspan@athena.mit.edu writes:
>@_ = (90470, 482466756, 285076, 95568296); eval ($hack = 's//($_-- >
>0) ? ($perl++) && ($hack) : (print "$perl ") && ($perl = "a") && ($_ =
>shift @_) && $hack/ee');

Sorry, it caused a segmentation fault on my system after eating up the
CPU.  I assume it's trying to print (in a very obscure way) "Just another
Perl hacker,".

It appears as though several posters are trying to out-perl others when
it comes to printing out the "standard" signature,

	Just another Perl hacker

How about having a contest for the best Perl hack that will print the
"standard" perl signature?  When run, such a hack should produce the same
results as:

	print "Just another Perl hacker";

"Best" is a relative term.  A signature should at least be portable and
be as obscure as possible.  Conciseness would be a plus.

This is just a suggestion and not an open invitation for everyone to
post just their hacks.   Perhaps someone could moderate enties by e-mail.
Is there a Perl guru out there able enough to judge the entries?

Eric Ziegast
University of Merryland