$line =~ /\((.*?)\)/ and $wah = $1 [download]
Update: oops: I forgot the capturing parentheses
In reply to Re: Search and Replace Regex by dpuu in thread Search and Replace Regex by andrew