Help for this page

Select Code to Download


  1. or download this
    my $str = "param1(info, blah) param2(new info, more blah)";
    while ($str =~ /(\S+\(.*?\))/g) {
        my $pattern = $1;
        print "Found pattern '$pattern'\n";
    }
    
  2. or download this
    Parameter2(new info(DN), blah)