develooper Front page | perl.fwp | Postings from September 2001

Re: World's Largest JAPH

Thread Previous | Thread Next
From:
Bart Lateur
Date:
September 11, 2001 04:46
Subject:
Re: World's Largest JAPH
Message ID:
3ttrptg991ot8bid6erpelvarm936qcan3@4ax.com
On Tue, 11 Sep 2001 08:56:54 +1000, Andrew.Savige@ir.com wrote:

>Just to clarify, the JAPH starts with the line:
>    '%'=~
>not with:
>    open 0;
>Your leading junk looks suspiciously like the original ASCII
>program from which the JAPH was generated (with a leading
>#! perl -w added). If you delete these lines from the file,
>japh.pl, say, then run with:
>  perl japh.pl
>the leading junk and the warnings should disappear.

OK, it looks like you'll have to walk me through this.

If I keep the lot, it works. Er, no... it prints the banner twice. I
thought the "regex" was a noop, apparently it's not. It must be
"equivalent" to the original code. What both do is take its own source,
replace most characters with "#", and print it out.

But how is the japh "generated" from this code? Are you saying there's a
"banner" program that turns plain source into this kind of weird shit?
Still with the original functionality as a perl script?

-- 
	Bart.

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About