title: need to remove multiple "-" from the string which is alpha numeric using tcl
body: <p>I have this string:</p>
  
  <pre><code>svpts-7-40.0001
  </code></pre>
  
  <p>And I need to remove the second '-' from this. 
  Basically I am fetching values like these which would come with double '-' SOMETIMES. So if such variables are seen then I have to remove the second '-' and replace the same with '.' , so the string should look like:</p>
  
  <pre><code>svpts-7.40.0001
  </code></pre>
  
  <hr>
  
  <p>[EDIT] I have tried:</p>
  
  <pre><code>% set list1 [split $string -]
  svpts 7 40.0001
  % set var2 [join $list1 .]
  svpts.7.40.0001
  %
  </code></pre>