在tcl中递归复制目录

Question

当我尝试递归地将目录复制到另一个目录时，我收到一条错误消息。如果foo是我的源，bar是我的目标目录，我收到错误

"can't overwrite file "bar/foo" with directory "foo"

我的tcl命令是

file mkdir "bar"
file copy -force  ./foo bar

我哪里错了？

Answer 1

您可以使用exec：

exec cp -f ./foo bar

它总是适合我。