Hi group!

I sell a CGI software where when the buyer fill out the order
form all of the different parameters and paths get set for the
user's domain name.

The CGI software contains about 50 files. I am wanting to have a
script that will ZIP all of the files from the server and e-mail
the archive to the buyer.

Anyone knows of a script that will zip files in a particular
folder?

Would something like this work?

(I am not sure if a ZIP Content-type exist)

print "Content-type: application/zip\n\n";
open (ZIP, "zipfile.zip $MyZipDir |");
while (<ZIP>) { }
close(ZIP);
open(ZIP, "zipfile.zip");
while (<ZIP>) { print $_; }
close (ZIP);
exit;

Any assistance would be appreciatted.

Normand J. Charette



_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to