my $z = new Archive::Zip::SimpleZip '-', Stream => 1;

foreach my $file (@many_files) {
   open (my $fh, $file);
   $z->addFileHandle($fh, Name => $file);
   close($fh);
}

$z->close();