in reply to how to parse character in between two braces ( ... )

Or use

($pre, $target, $post)= split /[()]/, $data;

CountZero

"If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law

In Section Seekers of Perl Wisdom