in reply to how to extract zip files
read the documentation file :
perldoc archive::zip
update : if you cant find it , look for "extractTree"