Help for this page

Select Code to Download


  1. or download this
    $ perl -Mre=eval -e '/ (??{ "(?{1})" }) $_ /x'
Eval-group not allowed at runtime, use re 'eval' in regex m/(?{1})/ at
+ -e line 1.
  2. or download this
    $ perl  -e '/ (?{1}) $_ /x'
Eval-group not allowed at runtime, use re 'eval' in regex m/ (?{1})  /
+ at -e line 1.
...
Eval-group not allowed at runtime, use re 'eval' in regex m/(?{1})/ at
+ -e line 1.

$ perl -Mre=eval -e '/ (??{ qr"(?{1})" }) $_ /x'