Help for this page

Select Code to Download


  1. or download this
    $_ = '1()()()2923()())))((';
s/[()]+//g;
print;
  2. or download this
    $string='111(22(33))44554'; 
$re = qr/\((?:(?>[^()+])|(??{$re}))*\)/; 
$string =~ s/$re//; 
print $string