Self printing strings!

$"=$,;*{;qq{@{[(A..Z)[qq[0020191411140003]=~m[..]g]]}}}=*_=sub{print/:
+:(.*)/};
$\=$/;q&lt;Just another Perl Hacker>->();
[download]

Well, that would have meant something if not some of the brackets disappeared...

-- Abigail

Comment on Self printing strings! Download Code

Replies are listed 'Best First'.
RE: Self printing strings! by vkonovalov (Monk) on Jul 14, 2000 at 10:02 UTC
Uff, may be you'll explain this? Starting with tenth char things became more and more obfuscated. (As I see, only once "<" was replaced by &, all other chars were displayed correctly) I understand, this is an Obfuscation division, but doing obfuscation without any limit is heartless :) :-)	[reply]
RE: RE: Self printing strings! by btrott (Parson) on Jul 14, 2000 at 10:06 UTC
Here's a hint. Figure out what this part of the code translates to: `(A..Z)[qq[0020191411140003]=~m[..]g]` [download] This should give you a very good hint as to the magic happening. Then look in perlvar to figure out the rest.	[reply] [d/l]
RE: Self printing strings! by athomason (Curate) on Jul 14, 2000 at 00:36 UTC
Rather than using `<pre></pre>`, use <`CODE`><`/CODE`> tags as per the Site How To. This will correctly escape brackets, ampersands, etc. I tried to include the correct version, but the source is so garbled, I'm not sure what you intended :-).	[reply] [d/l] [select]
RE: RE: Self printing strings! by Abigail (Deacon) on Jul 15, 2000 at 02:38 UTC
Urg. <CODE> is already a valid HTML element, and it's an inline element, not a block. `:-(` -- Abigail	[reply]
RE: RE: Self printing strings! by Ovid (Cardinal) on Jul 14, 2000 at 20:45 UTC
Actually, you can check out Using PerlMonks code to clean up source code that's been printed with <PRE> tags. It's a little script I wrote to make PM code a bit easier to work with. However, you'll want to replace the last regex with the following: `s/<a href="[^"]+">([^<]+)<\/a>/[$1]/g;` [download]	[reply] [d/l]