Ronald,
Thank you.
This was good.
Here how it was done, right?
==========================================================
$s1 = '}_).} "*}_} }./}(}_ }}_, (}_+}_,*"';
$s2 = '/- + *,+ < + :- /:- << :- @';
$s3 = ' `` @ `` ` @ ` ` ` ';
$s4 = $s1 & ~$s2 | $s3;
print "$s4\n";
__END__
# original splited into meaningful pieces
''=~("(?{"
.
(
'}_).} "*}_} }./}(}_ }}_, (}_+}_,*"'
&
~'/- + *,+ < + :- /:- << :- @'
|
' `` @ `` ` @ ` ` ` '
)
.
"})");
__END__
# original
''=~("(?{".('}_).} "*}_} }./}(}_ }}_, (}_+}_,*"'&
~'/- + *,+ < + :- /:- << :- @'|
' `` @ `` ` @ ` ` ` ')."})");
==========================================================
Warmest Regards
----
Lev Selector
ficc-oefeedback,
New York, t. 212-902-3040
-----Original Message-----
From: Ronald J Kimball [mailto:[EMAIL PROTECTED]]
Sent: Thursday, August 16, 2001 11:09 AM
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
