Re: Unbalanced, Introspective Japh

I never suspected that that sentence would be found in $^X :). On my system it takes a second to print it, then waits for some 30 more until it ends. Changing the eof test for something like 26==$; makes it end at the approppriate moment, although it's maybe less obfuscated. Can also do something more cluttered like $]*$]<$;, trading some of the whitespace magic.

--
David Serrano

Comment on Re: Unbalanced, Introspective Japh

Replies are listed 'Best First'.
Re^2: Unbalanced, Introspective Japh by liverpole (Monsignor) on Jul 01, 2006 at 12:40 UTC
That's very interesting, and it's different from my system, where there's only a brief, almost undiscernable pause while printing "just", and the program ends immediately after printing the final word. I'm guessing it's either because I have a faster processor or a different version of Perl. It was intentional that I didn't implement any tests which were more likely to depend on the specific version of Perl running, as that might have needlessly broken the program for other versions of Perl. Which version of Perl are you running, by the way? s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/	[reply]
Re^3: Unbalanced, Introspective Japh by Hue-Bond (Priest) on Jul 01, 2006 at 12:51 UTC
Which version of Perl are* you running* v5.8.8 built for i486-linux-gnu-thread-multi. My `perl` executable has a size of 1076888 bytes -- David Serrano	[reply]
Re^4: Unbalanced, Introspective Japh by jdalbec (Deacon) on Jul 02, 2006 at 04:14 UTC
What does `ldd /usr/bin/perl` show?	[reply] [d/l]


Come for the quick hacks, stay for the epiphanies.
	PerlMonks