Help for this page

Select Code to Download


  1. or download this
    $a=q("aaa" and "bbb");
$a =~ s/".*"/test/g;
...
$a=q("aaa" and "bbb");
$a=~ s/".*?"/test/g;
print "with backtrack supress #$a#\n";
  2. or download this
    $text = <<'EOT';
Message-ID: <ODM2bWFpbGVyLmRpZWJlYS40MjYyNjE2LjEyOTU1NDE2MTg=@out-p-h.
+customernews.net>
...
    }
    print "\n\n";
}