RE: My latest attempt

Replies are listed 'Best First'.
RE: RE: My latest attempt by mdillon (Priest) on May 11, 2000 at 19:59 UTC
good idea. you could use $/ to get a line ending, maybe turning 'print @a' into 'print @a.$/'.	[reply]
RE: RE: RE: My latest attempt by Adam (Vicar) on May 16, 2000 at 18:39 UTC
I'm inclined to think that the current hiding place of the newlines is even more obfuscated then $/. I could easilly add the extra newline without reducing the obfuscation. I'll think about making said revision to the original. UPDATE: Okay, I've decided that the proposed update actually makes some sense. I also voted for turnstep and mdillon's posts. So here it is: `$_=' 2\|21\|32\|52\|47\|45\|9l3\|51A19a4\|46\|28\|34\|54M0y1t5' .q&!38e14\|30\|49\|57s7\|26o43t29\|16p10P48r11\|50\|42\|58&; sub s{while($b=shift){$a[shift]=$b};print@a=>$/}$_.= q#c27\|55\|15o12:17u25\|37n20H53\|33(40)59k56\|36m44j13t8 39\|18e6f24\|41O22b23d31i35#;while#a4\|46\|28:17u25\|37'; (s&(\D?)(\d+?)\\|&$1$2$1&){};@_=split/(\d+)/;&s#eval;` [download] Enjoy!	[reply] [d/l]


The stupid question is the question not asked
	PerlMonks