title: How can I create a Zip archive in Perl?
body: <p>I need to create a Zip archive after filtering the list of files I want to include.  Preferably I'd like the module to work in both Windows and Linux.</p>
  
  <p>Since I need to filter the list of files, I don't really want to to use an external program. I'd rather not introduce external dependencies either so I can compile the script into a single executable on Windows (using <a href="http://www.activestate.com/perl_dev_kit/" rel="nofollow noreferrer">ActiveState PDK</a>).</p>
  
  <p><strong>What I already tried</strong> </p>
  
  <p>Until now I've used <a href="http://search.cpan.org/~adamk/Archive-Zip-1.26/lib/Archive/Zip.pm" rel="nofollow noreferrer">Archive::Zip</a> found on <a href="http://search.cpan.org/" rel="nofollow noreferrer">CPAN</a> but it has a major bug on Windows machine that use non-ASCII filenames: the filenames get corrupted in the archive as they don't get translated into unicode.  </p>
  
  <p>There is a <a href="http://rt.cpan.org/Public/Bug/Display.html?id=35334" rel="nofollow noreferrer">bug report filed</a> for that but it hasn't been updated in over 10 months and in the module documentation the developer is rather unhelpful (of the "fix your computer or get rid of Windows" kind).</p>
  
  <p><em>Update:</em><br>
  Thanks to the clarifications from brian and Alan Haggai Alavi it seems that enough love is being put in <code>Archive::Zip</code> to get these bugs out soon and finally have a fully functioning zip module in Windows.</p>