Select Code to Download

s# ([(][^)]*[)]) # my $x=$1; $x =~ s/,/;/g ; $x #xeg

s{ 
  \( 
...
  $x =~ tr/,/;/; 
  $x;
}gsex;