This is another answer:

my $wah = m/\(([^\)]+)\)/;
[download]

See Common Regex Gotchas for information on why this is so.

Regards.

Edit: Apologies to dpuu for misreading the above node and thanks for pointing this out. Both forms have their pros and cons as discussed in Ovid, Long Live .*? (dot star question-mark).