关于在 tcl 中执行 *.file

发布于 2024-12-12 00:00:49 字数 172 浏览 0 评论 0原文

对于此脚本：

puts [exec cvs up *.tcl]

我想更新此文件夹下的所有 .tcl 文件。

但我总是收到“cvs update：对 *.tcl 一无所知”错误消息。

我该如何解决这个问题？

非常感谢

原文

for this script:

puts [exec cvs up *.tcl]

I want to cvs updtae all the .tcl file under this folder.

But I always get "cvs update: nothing known about *.tcl" error msg.

How can I solve this?

Many thanks

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

谈下烟灰 2024-12-19 00:00:49

您不希望 TCL 进行通配操作 - 您希望它在 shell 中进行。试试这个

set exec_call "cvs up *.tcl"
set caught [catch {eval exec -keepnewline $exec_call } result]
if { $caught } {
  #handle the error stored in $result
} else {
  #handle success
}

You don't want TCL to do the globbing - you want it to happen in the shell. Try this

set exec_call "cvs up *.tcl"
set caught [catch {eval exec -keepnewline $exec_call } result]
if { $caught } {
  #handle the error stored in $result
} else {
  #handle success
}

回复收藏 0 原文

深者入戏 2024-12-19 00:00:49

TCL exec 不支持全局。尝试 puts [exec cvs up [glob *.tcl]]

编辑：这不太有效；看评论。以下方法确实有效：

# These two don't work with spaces in the names:
exec echo [glob *.tcl] | xargs cvs up
exec bash -c "cvs up [glob *.tcl]"
# Use this instead:
exec bash -c "cvs up *.c"

TCL exec doesn't glob. Try puts [exec cvs up [glob *.tcl]]

Edit: That doesn't quite work; see the comments. The following methods do work:

# These two don't work with spaces in the names:
exec echo [glob *.tcl] | xargs cvs up
exec bash -c "cvs up [glob *.tcl]"
# Use this instead:
exec bash -c "cvs up *.c"

回复收藏 0 原文