title: Excluding a file extension while parsing a CSV file
body: <p>So I'm new to Perl and writing a script that would read through rows in a CSV file, and rename a directory of files associated with a certain column in that CSV file.</p>
  
  <pre><code>my $filename_formatted = "$row-&gt;[3]"."_"."$row-&gt;[4]"."_"."$row-&gt;[2]\n";
  my $resume_id = $row-&gt;[1];
  
  
  if (-e $resume_id){
      rename($resume_id, $filename_formatted);
  }
  </code></pre>
  
  <p>Basically, how could I format <code>$resume_id</code> to accept only the contents up to the file extension? The <code>$row-&gt;[1]</code> variable contains something like "resume_1231.pdf" or "resume_1231.doc". I basically want everything up to the <code>.</code></p>
  
  <p>I understand I would probably need a regex, but, I've never utilized it in Perl. </p>
  
  <p><code>$formatted_resume_id = /($row-&gt;[1])?!\..*$/</code> </p>
  
  <p>I don't know. </p>