Help for this page

Select Code to Download


  1. or download this
    ...
my $rxBetween = qr
...
...
$string =~ s{$rxBetween}{+$2}g;
...
  2. or download this
    Compiling REx `[[<{(]'
size 12 Got 100 bytes for offset annotations.
...
   4 <<x1>> <[x2]{x3}>    |  5:    ANYOF[)>\]}]
                              failed...
...
  3. or download this
    Compiling REx `[[<{(]'
size 12 Got 100 bytes for offset annotations.
...
       (?{print qq{Match @{ [++ $count] }: on left $1, on right $2\n}}
+)
   ...' against `x2]{x3}(x4)'
...