Help for this page

Select Code to Download


  1. or download this
    use constant FOO => 'bar';
my $x = FOO;
$x = qr/$x/;

"somehting" =~ $x
  2. or download this
    our $FOO = 'bar';
my $x = qr/$FOO/;

"something" =~ $x;