[Israel.pm] gzip / gunzip

[Berler Chanan]

Hi All,
Does anyone have a perl script doing zip / unzip files ? 
I need to deploy files into hosts over the net, and wanted it to be zipped
before I can send it.
(Don't wanna use system gzip / zip to do it, because I don't know if there
is the same utill on the host).
I tried looking for Archive::Zlib for help, but it works only for x files
only (no subdirectories).

Thanks
Chanan