Since your script is creating the files you could use IO::Zlib to create the archive and write directly the compressed files. The IO::Zlib docs have some examples to that effect. OOPS... this would work for gzip files not zip files...