The Backslash Challenge

Replies are listed 'Best First'.
Re: The Backslash Challenge by choroba (Cardinal) on Mar 24, 2021 at 22:11 UTC
OK, here are some solutions I was able to find: <Reveal this spoiler or all in this thread> -->> `map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^ARGV,3]`	[reply] [d/l] [select]
Re^2: The Backslash Challenge by Tux (Canon) on Mar 25, 2021 at 11:03 UTC
Two more options `Encode::encode("cp1047","*")` `charnames::string_vianame("REVERSE SOLIDUS")` Enjoy, Have FUN! H.Merijn	[reply] [d/l] [select]
Re: The Backslash Challenge (updated) by haukex (Archbishop) on Mar 24, 2021 at 20:29 UTC
I began reading Gory details of parsing quoted constructs in regards to `q\\`, then I clicked on your spoiler... <Reveal this spoiler or all in this thread>	[reply] [d/l] [select]
Re^2: The Backslash Challenge (updated) by LanX (Saint) on Mar 24, 2021 at 20:52 UTC
> then I clicked on your spoiler... I should have done this earlier ... Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery}	[reply]
Re: The Backslash Challenge by LanX (Saint) on Mar 25, 2021 at 02:18 UTC
The goal is maximum obfuscation, right? ;) <Reveal this spoiler or all spoilers in this node or all in this thread> The second one requires a recent Perl but can be easily rewritten to work with older versions. :) update also tried this but see comment <Reveal this spoiler> Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery} update added trailing `;` to debugger examples	[reply] [d/l] [select]
Re^2: The Backslash Challenge by choroba (Cardinal) on Mar 25, 2021 at 07:45 UTC
Nice trick! Interestingly, it doesn't work for me. In the debugger, I'm getting `cont: Can't find string terminator "\" anywhere before EOF at (eval 13)[/usr +/lib/perl5/5.26.1/perl5db.pl:738] line 2. at (eval 13)[/usr/lib/perl5/5.26.1/perl5db.pl:738] line 2. eval '' called at /usr/lib/perl5/5.26.1/perl5db.pl line 738 DB::eval called at /usr/lib/perl5/5.26.1/perl5db.pl line 3140 DB::DB called at -e line 1` [download] And if I run it in a script instead, the output is `_`, not `\` :-o `map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^ARGV,3]`	[reply] [d/l] [select]
Re^3: The Backslash Challenge by LanX (Saint) on Mar 25, 2021 at 11:05 UTC
> cont: A backslash at EOL marks a multiline statement in DB. I had a trailing whitespaces to avoid this, but the C&P from cmd.exe erased them. :( Fixed now! > And if I run it in a script instead, the output is _, not \ :-o both lines? lemme check... ... Argh! Seems that the context of the debugger is initializing a "crucial thing" which can't be taken for granted :( <Reveal this spoiler or all in this thread> update yes a `use DB;` at the start of the script is "fixing" it. Actually that could be a source of a Heisenbug. Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery}	[reply] [d/l]
Re^4: The Backslash Challenge by choroba (Cardinal) on Mar 25, 2021 at 11:27 UTC
Re: The Backslash Challenge by LanX (Saint) on Mar 24, 2021 at 20:56 UTC
<Reveal this spoiler or all spoilers in this node or all in this thread> update <Reveal this spoiler> Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery}	[reply] [d/l]
Re^2: The Backslash Challenge by haukex (Archbishop) on Mar 24, 2021 at 21:03 UTC
<Reveal this spoiler or all in this thread>	[reply] [d/l]
Re^3: The Backslash Challenge by LanX (Saint) on Mar 24, 2021 at 21:08 UTC
yeah I updated something similar. Mine is simpler, yours is less cheating... more obfuscated! ;-) Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery}	[reply]

update

update

update

update