title: How can I replace special character in a string with underscores using a Perl script?
body: <p>I have a script taking mythtv recorded shows and encoding them in h264 using handbrake. the script is written in Perl. </p>
  
  <p>My questions is how do I replace spaces and special characters with and underscore using perl?</p>
  
  <p>The strings look something like this when output <code>"Parks and Recreation - S05E01 - Ms. Knope Goes to Washington"</code></p>
  
  <p>I would like it to look like this</p>
  
  <blockquote>
    <p>Parks_and_Recreation_S05E01_Ms__Knope_Goes_to_Washington</p>
  </blockquote>
  
  <p>Thanks in advance. I did do some googling but having found anything useful that I can implement.</p>