我想在我的TCL程序中执行一个有两个参数的python函数。我的解压缩file.zip的python函数是由以下代码定义的:
# -*- coding: utf8 -*-
import zipfile
import os.path
import os
def dezipFile(filezip, pathdst = ''):
if pathdst == '': pathdst = os.getcwd()
zfile = zipfile.ZipFile(filezip,'r')
for i in zfile.namelist():
print (i)
if os.path.isdir(i):
try: os.makedirs(pathdst + os.sep + i)
except: pass
else:
try: os.makedirs(pathdst + os.sep + os.path.dirname(i))
except: pass
data = zfile.read(i)
fp = open(pathdst + os.sep + i, "wb")
fp.write(data)
fp.close()
zfile.close()
然后,我想在我的TCL程序中执行这个函数。我用过exec
。TCL脚本:
puts "--outzip is: $outZip"
puts "--destinationDeZip is: $destinationDeZip"
set zip_status [ catch {exec python dezipFile.py ${outZip} ${destinationDeZip}} id ]
if {$zip_status == 1} {
puts "**** Error: $id *********"
} else {
puts "**** Pass: the zipped file $fileName is extracted *********"
}
在结果报告中,我找到了消息**** Pass: the zipped file $fileName is extracted *********
。命令似乎被传递了,但是压缩文件并没有像预期的那样被解压。我的程序中有什么错误吗?
谢谢。
发布于 2018-08-16 20:41:40
您需要在Python端编写一些额外的代码来实际调用您定义的函数。
if __name__ == '__main__':
import sys
dezipFile(*sys.argv[1:])
sys.argv[1:]
获取脚本名之后的所有参数,然后执行dezipFile(*…)
操作,将所有这些参数作为单独的参数传递给dezipFile
函数。
发布于 2018-08-21 07:00:39
这不是一个答案,更多的是一个改进的建议:我假设你知道你没有求助于Python来解压和访问Tcl中的ZIP存档的内容?
首先,您可能需要考虑使用tcllib
模块zipfile::decode
:
package require Tcl 8.6
package require zipfile::decode
try {
::zipfile::decode::unzipfile $outZip $destinationDeZip
} on error {errMsg opts} {
# ...
}
(这里假设您可以使用Tcl 8.6。)
https://stackoverflow.com/questions/51877032
复制相似问题