$text =~ s/\(//g;
$text =~ s/\)//g;