<?xml version="1.0" encoding="UTF-8"?> 

<!--
	压缩整个文件夹,不包括文件夹的名字
	解压文件夹,不包括文件夹的名字
-->

<project name="myAntProject" default="" basedir="..\">
	
	<property name="dist" value="dist" description="文件夹dist,存放打包好的文件"></property>
	
	<target name="zipDir">
		<zip destfile="${dist}/my.zip" basedir="${dist}"></zip>
	</target>
	
	<target name="unZipDir">
			<unzip dest="C:\Users\Kevin\Desktop" src="${dist}/my.zip"></unzip>
	</target>

</project>

1，Python 解压压缩包至文件夹
import zipfile
with zipfile.ZipFile(path_to_zip_file, 'r') as zip_ref:
    zip_ref.extractall(directory_to_extract_to)

2，Python 把整个文件夹打包至压缩包
import os
import zipfile
    
def zipdir(path, ziph):
    # ziph is zipfile handle
    for root, dirs, files in os.walk(path):
        for file in files:
            ziph.write(os.path.join(root, file), 
                       os.path.relpath(os.path.join(root, file), 
                                       os.path.join(path, '..')))
      
zipf = zipfile.ZipFile('Python.zip', 'w', zipfile.ZIP_DEFLATED)
zipdir('tmp/', zipf)
zipf.close()

perl copy只能复制文件，不能复制文件夹，因此只能用外扩包进行文件夹的复制

包的下载步骤：

进入http://search.cpan.org；

搜索File::Copy::Recursive；



点击第一个并下载；



下载后解压，获取File-Copy-Recursive-0.45\lib\File\Copy路径下的Recursive.pm，复制到perl文件所在的目录

使用方法：

用文本编辑器打开包，将包名package File::Copy::Recursive改为package Recursive；

在perl文件中调用，这里我.pl文件所在的路径为‘F:\VirtualShare\Script';



调用方法：my $copy_ret=Recursive::dircopy($sou_path,$tar_path) or die $!;

sou_path=sou_dir+foldername;

tar_path=tar_dir+tar_refoldername;

dir表示不含文件夹名的路径，foldername是文件夹名，相应的tar_refoldername是将文件夹复制到目标路径的重命名的文件名，如名字不想改，可以让redoldername为foldername（注：路径中注意dir与foldername的连接符，win下“\"，linux下”/“。

参考博文https://blog.csdn.net/xuexiaokkk/article/details/51728340有所更改

先压缩成压缩文件，上传后再进行解压
import zipfile

import os

files = zipfile.ZipFile(‘hymenoptera_data.zip’,‘r’)

files.extractall(os.getcwd())