title: Perl - remove carriage return and append next line
body: <p>What if I have a record in a otherwise good file that had a carriage return in it.</p>
  
  <p>Ex:</p>
  
  <pre><code>1,2,3,4,5 ^M
  ,6,7,8,9,10
  </code></pre>
  
  <p>and I wanted to make it</p>
  
  <pre><code>1,2,3,4,5,6,7,8,9,10
  </code></pre>