$a =~ s/(\(\w+),(\w+\))/$1-$2/g;