Help for this page

Select Code to Download


  1. or download this
    > perl -e"use strict; our $x = $x;"
> perl -e"use strict; our $x = qr/(??{ $x })/;"
...
> perl -e"use strict; my $x = qr/(??{ $x })/;"
Global symbol "$x" requires explicit package name at (re_eval 1) line 
+2.
Compilation failed in regexp at -e line 1.
  2. or download this
    $ perl -e'use strict; our $x=$x;'
$ perl -e'use strict; our $x=qr/(??{ $x })/;'
...
$ perl -e'use strict; my $x = qr/(??{ $x })/;'
Global symbol "$x" requires explicit package name at (re_eval 1) line 
+2.
Compilation failed in regexp at -e line 1.
  3. or download this
    $ perl -e'use strict; our $x = $x'
$ perl -e'use strict; our $x = qr/(??{ $x })/;'
$ perl -e'use strict; my $x = qr/(??{ $x })/;'