Re: your obfuscation magic!

I had no idea you could replace regex delimiters with... whatever! Can't wait to make my one-liners even more annoyingly obfuscated =P

Comment on Re: your obfuscation magic!

Replies are listed 'Best First'.
Re^2: your obfuscation magic! by tobyink (Canon) on Apr 24, 2012 at 21:00 UTC
Beware that some delimiters have special meanings. e.g. `m/$foo/i` interpolates $foo whereas `m'$foo'i` does not. Regular expressions are not the only delimiters that can be replaced with whatever. `qq()`, `q()`, `qx()` and `qw()` work similarly. For example, the following assigns a string consisting of a single space character to $foo: `my $foo = q q q;` [download] `perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'`	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: your obfuscation magic!
by tobyink (Canon) on Apr 24, 2012 at 21:00 UTC

Beware that some delimiters have special meanings. e.g. m/$foo/i interpolates $foo whereas m'$foo'i does not.

Regular expressions are not the only delimiters that can be replaced with whatever. qq(), q(), qx() and qw() work similarly. For example, the following assigns a string consisting of a single space character to $foo:

my $foo = q q q;
[download]

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

[reply]
[d/l]
[select]