# Removes the leading paren and the trailing paren in place.
$string =~ s/^\(//;
$string =~ s/\)$//;