Is there a way to have Perl zip up files within a script? For example. I have a script that generates 5 txt files in a directory and I would like Perl to zip them up in one file.