Select Code to Download

#!/usr/bin/perl

...
+ ab()()cde
- ab(c(d)e
- ab(c)d)e

PASS PASS + Cont(ains balanced( nested Br(ack)ets )in t)he text
          - Con(tains i(mbalan(ced Br(ack)ets, )one c)lose missing
...
PASS PASS + ab()()cde
          - ab(c(d)e
          - ab(c)d)e

our @matches;

...
    print " $_\n";
    print "       $_\n" foreach @matches;
}