# read the zip file into $zip, then

chdir $path_where_data_should_go or 
   die "Can't get to $path_where_data_should_go: $!";

for my $mbr ( $zip->members ) {
   $zip->extractMemberWithoutPaths( $mbr );
}