title: Excluding a file with perl grep
body: <p>I want to go over all of the files in the directory, except for files ending with '.py'.
  The line in the existing script is:</p>
  
  <pre><code>my @files = sort(grep(!/^(\.|\.\.)$/, readdir($dir_h)));
  </code></pre>
  
  <p>And I want something like:</p>
  
  <pre><code>my @files = sort(grep(!/^(\.|\.\.|"*.py")$/, readdir($dir_h)));
  </code></pre>
  
  <p>Can you please help with the exact syntax?</p>