Help for this page

Select Code to Download


  1. or download this
    use re 'debug';

...
$funpat = qr/\w+$np/;

"fun(1,(2),5)" =~ /^$funpat$/; #Matches!"
  2. or download this
    Compiling REx "%n           \(%n           (?:%n              (?> [^()
+]+ ) "...
Final program:
...
Match successful!
Freeing REx: "%n           \(%n           (?:%n              (?> [^()]
++ ) "...
Freeing REx: "\w+(?^x:%n           \(%n           (?:%n              (
+?> ["...