Path: utzoo!attcan!uunet!littlei!omepd!iwarp.intel.com!news
From: merlyn@iwarp.intel.com (Randal Schwartz)
Newsgroups: comp.lang.perl
Subject: Re: Request for JAPH collection
Keywords: JAPH oneliners request
Message-ID: <1990Dec5.231552.1916@iwarp.intel.com>
Date: 5 Dec 90 23:15:52 GMT
References: <5048@taux01.nsc.com> <109884@convex.convex.com>
Sender: news@iwarp.intel.com
Reply-To: merlyn@iwarp.intel.com (Randal Schwartz)
Organization: Stonehenge; netaccess via Intel, Beaverton, Oregon, USA
Lines: 20
In-Reply-To: tchrist@convex.COM (Tom Christiansen)

In article <109884@convex.convex.com>, tchrist@convex (Tom Christiansen) writes:
| My tutorial at USENIX this January is going in include this as an
| appendix.  It's the JAPH from about the first half of comp.lang.perl; I
| petered out after a while, but I know where I left off so can continue at
| will.

[my JAPH's deleted]

Yow!  Some of those are pretty convoluted!  I can't remember doing
half of those.  Paper-tape!  Buried in a sea of characters!  Wow!  I
was pretty smart once. :-)

So, to continue the tradition... :-)

print pack("u","\327=\0\206\353\364\242\\\200\302\\\254\2\210\c\256\\\214"."\0"x 24)
-- 
/=Randal L. Schwartz, Stonehenge Consulting Services (503)777-0095 ==========\
| on contract to Intel's iWarp project, Beaverton, Oregon, USA, Sol III      |
| merlyn@iwarp.intel.com ...!any-MX-mailer-like-uunet!iwarp.intel.com!merlyn |
\=Cute Quote: "Intel: putting the 'backward' in 'backward compatible'..."====/