Help for this page

Select Code to Download


  1. or download this
    perl -Mre=debug -le " $_=q{fakesite.com/f/files-url/blah.png}; if(m{fakesite.com.*}){ warn 1; if(/files-url/){ die 2 }} "
  2. or download this
    

...
Freeing REx: "files-url"

$
  3. or download this
    $ perl -Mre=debug -le "$f=123; $f=~/^.*/g; warn pos $f; $f=~ /\d/g; wa
+rn pos $f; "
Compiling REx "^.*"
...
Freeing REx: "\d"

$