TCL期望正则表达式
我正在尝试编写一个脚本,通过 TCL/Expect 从一个系统爬升到另一个系统。它对我有用。我需要一个正则表达式,其中 expect "$ " 和 expect "# " 组合…
TCL 如何将数组作为类成员 (Itcl)
我想要一个数组作为私有类成员。我使用 Itcl 包。 对于列表和其他简单变量,我正在编写: itcl::class MyClass { private variable m_myVar "" privat…
将标准输入通过管道传输到“expect”脚本
我正在使用 expect 通过 ftp 上传文件。该文件通过管道传输到我的 bash 脚本中。 #!/bin/bash HOST='example.com' USER='XXX' PASSWD='XXX' expect <<…
同时支持 Tcl 和 Python?
我有一个与 Tcl 静态链接的二进制应用程序,前端是 Tcl 解释器。我想为用户提供使用 Python 执行相同命令的功能,作为关键字选项。 Tcl 语法的示例如…
cygwin 上的 Auto_execok 问题
我有一个问题: auto_execok 命令无法按预期在 Cygwin 平台上运行。 它无法从您的 PATH 环境变量中找到任何内容,因为 info body auto_execok "... fo…
如何使用变量作为 TCL proc 参数的默认值
我有一个变量,我想将其用作参数的默认值: proc log {message {output $::output}} { .... } 有没有办法做到这一点,或者需要我评估我的过程中的变量…
在不存在文件名 fileName 的情况下调用 sqlite3 fileName 时,如何避免 sqlite3 创建新的空数据库?
如果我使用 $ sqlite3 fileName sqlite> .s sqlite>_ 并且没有名为 fileName 的文件,sqlite3 会创建一个新的空数据库。有办法避免这种情况吗?理想情…
使用 gcc 3.4.5 编译 TCL 7.6.2
我正在使用 gcc 3.4.5 编译 TCL 7.6p2。我使用的是 CentOS 5.5。我在 make 命令期间收到以下错误: ./../generic/tclPosixStr.c: In function `Tcl_Er…
痛饮+ tcl + c++ (内存管理)
我在 tcl 中有一个过程,它再次使用 swig 创建的接口调用 C++ 方法。该过程返回一个指针列表。我使用 tcl 检查列表中单个元素的所有权, [lindex $lis…
Tcl/Tk - 自动化 GUI 测试
我想自动化我的 GUI 测试。我经历了以下帖子,但如果有人可以发布示例测试以下示例的代码对我来说更容易理解。 以下是我的简单 Hello World 代码。 na…
使用格式时 Tcl 中的命令名称无效
我正在运行以下命令 set full_pin_name [format "%s %s" $top_cell $encoded_name] puts "full_pin_name is $full_pin_name" ,但收到以下错误: full…
Tcl 8.4 和 8.5 中的 keylset 错误?
考虑以下简单的练习: package require Tclx keylset myArray "v1.5" "ready" puts $myArray 预期输出: {v1.5 ready} 实际输出: {v1 {{5 ready}}} …