## when using '-', Stream is set to 1
my $z = new Archive::Zip::SimpleZip '-', 
  or print STDERR "Cannot create zip file: $SimpleZipError\n";

foreach my $file (@files) {

 ... do some stuff to the file

 my $fh = $z->openMember(Name => "<filename.ext>");
 print $fh <stuff>;
 close($fh);

} 

$z->close;