Whew.  But is it Perl?  :)

''=~("(?{".('}_).} "*}_} }./}(}_ }}_, (}_+}_,*"'&
~'/-  +   *,+ <  + :- /:-   << :-  @'|
'  ``   @     `` `   @  ` `  `   ')."})");

---
Frank Bicknell, Sysadmin
Cisco Systems, Inc.
(919) 392-3798


> -----Original Message-----
> From: Ronald J Kimball [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, August 16, 2001 11:09
> To: [EMAIL PROTECTED]
> Cc: [EMAIL PROTECTED]
> Subject: Re: JAPHs with no unsightly letters or numbers
> 
> 
> 
> Please disregard the previous message.  This one contains the correct
> code.  (Damn KDE clipboard!)
> 
> 
> On Thu, Aug 16, 2001 at 11:10:09AM +1000, [EMAIL PROTECTED] wrote:
> > I have found all the JAPHs with no alphanumeric
> > characters both interesting and instructive.
> > However, none of them write to stdout,
> > since they all use the `$_` trick.
> > 
> > This leads me to conjecture that:
> > 
> >  It is impossible to write a JAPH that writes to stdout
> >  without using at least one alphanumeric character.
> 
> This conclusion does not follow logically.  :)
> 
> 
> > I await the refutation.
> 
> Enjoy!
> 
> 
> ''=~("(?{".('}_).} "*}_} }./}(}_ }}_, (}_+}_,*"'&
> ~'/-  +   *,+ <  + :- /:-   << :-  @'|
> '  ``   @     `` `   @  ` `  `   ')."})");
> 
> Inspired by Abigail and Japhy's recent postings.
> 
> 
> Ronald
> 

Reply via email to