Help for this page

Select Code to Download


  1. or download this
    use Regexp::Common;
    $pars =~ /^[^()]*$RE{balanced}{-parens=>'()'}[^()]*$/