Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
    $string =~ s{$rxHaystack}{$stuff1$1$stuff2};
    print qq{$string\n\n};
}
  2. or download this
    asdfgGOATaewrjgn
asdfg^^^GOAT+++aewrjgn
...

aGO<h3>i hate clowns</h3>ATbbb
a^^^GO<h3>i hate clowns</h3>AT+++bbb