Select Code to Download

#!/usr/bin/perl
#
...
       "succeeded\n" :
       "failed\n";
}

Cont(ains balanced( nested Br(ack)ets )in t)he text
     Match succeeded
...

ab(c)d)e
     Match succeeded

...
our $rxNest;
...
       )
   };
...

...
    if($string =~ /$rxNest/)
...
        print "     Match failed\n";
    }
...

...
our @memoList;
...
        print "     Match failed\n";
    }
...

Cont(ains balanced( nested Br(ack)ets )in t)he text
     Match succeeded
     (ack)
     ( nested Br(ack)ets )
     (ains balanced( nested Br(ack)ets )in t)

Con(tains i(mbalan(ced Br(ack)ets, )one c)lose missing
     Match succeeded
...
     (ack)
     (ced Br(ack)ets, )
     (mbalan(ced Br(ack)ets, )one c)

#!/usr/bin/perl
#
...
        print "     Match failed\n";
    }
}

String: Cont(ains balanced( nested Br(ack)ets )in t)he text
     Match succeeded
...

String: ab(c)d)e
     Match failed

#!/usr/bin/perl
#
...
        print "     Match failed\n";
    }
}

String: Cont(ains balanced( nested Br(ack)ets )in t)he text
     Match failed
...

String: ab(c)d)e
     Match failed