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
>