++ for straight forward adaption of some of the functions mentioned in the "SYNOPSIS" code from the Archive::Zip docs to the OP's need.

Note that I never open my own file handle, the module takes care of all that for me.

Of course, if he wants to he can use writeToFileHandle (see docs linked above) … the module provides this and a full wealth of other functions to read/write/create/manipulate Zip-Archives.