s{ 
  \( 
  (.*?) 
  \) 
}{ 
  my $x = $1; 
  $x =~ tr/,/;/; 
  $x;
}gsex;