title: How can I replace commas with & in the following string using Perl?
body: <p>I have a string like this:</p>
  
  <pre><code>my $string = 'Respect,13,201,7,0,0,2,3.70,4,1.01,Responsibility,13,177,29,1,1,2,3.58,4,1.04,Flexibility,13,180,27,0,0,3,3.59,4,1.05,Collaboration,13,194,13,0,0,3,3.65,4,1.04,Reflection,13,187,19,1,0,3,3.62,4,1.05,Commitmentto Learning,13,183,24,0,0,3,3.61,4,1.05,Beliefin Educator Efficacy,13,177,13,0,0,20,3.35,4,1.42,SocialIntelligence,13,184,22,1,0,3,3.61,4,1.05';
  </code></pre>
  
  <p>How can I write a pattern to be used with <code>s///</code> to replace each comma (<code>,</code>) just before the <code>\w+</code> (e.g., <code>Responsibility, Flexibility, Collaboration ...</code> ) with an ampersand (<code>&amp;</code>)'?</p>