tcl

    0热度

    2回答

    可以说我有一个字典somedict与key1 value1 是否有修改key1,让我们说,要somekey1而不删除key1,使一个新的记录somekey1的方法吗?

    0热度

    1回答

    我已经在Eggdrop v1.6.21下运行这个脚本,但是我无法启动它。我收到的错误是: Tcl错误文件 'eggdrop.conf': 错误#ARGS:应该是 “PROC名ARGS体” 在执行 “PROC Logit模型{缺口主机手柄通道文本} { 这可能是什么问题呢?这是我的脚本。 package require mysqltcl set port {3306} set host {12

    1热度

    1回答

    我想运行像ls *所以我试图 expect -c 'spawn ls *;expect eof;' expect -c 'spawn ls {*};expect eof;' ,但没有工作。 我的问题是如何通过*字符中重生? THX!

    -1热度

    2回答

    我需要帮助tcl。我有以下格式的文本文件: Main = 1 Bgp = 0 Backup = 1 我需要通过1对每个项目递增的整数值,例如更换Main = 1与Main = 2,等等。

    0热度

    1回答

    嗨,大家好,我需要你的帮助。我正在模拟比较一些有关平均统计数据的协议,并且我必须制作图表。我使用此代码并进行修改。 http://www.nipunharitash.com/wp-content/uploads/2016/04/xgraph.txt 我有2个问题: a)如何计算此例中的平均吞吐量,数据包丢失和数据包延迟?每种情况下我只需要一个图表显示平均值。 b)有什么方法可以计算抖动吗? 在此先

    0热度

    1回答

    这是一个简化的问题。我试图将一个过程复制到一个名称空间,以便它将使用名称空间自己的上下文。使用进口不工作(可能是因为它仅仅是创建别名)请参见下面的代码: proc me_namespace {} { puts "namespace is:[namespace current]" puts "called namespace is:[uplevel 1 namespace current ]"

    1热度

    2回答

    我试图从ttk:entry获取值。我有以下代码。 variable DefaultRoot ttk::label $wi.custcfg.dlabel -text "Default Root:" ttk::entry $wi.custcfg.daddr -width 10 -textvariable ::DefaultRoot -validate focusout -validatecomm

    0热度

    2回答

    我想在for循环中生成几个组合框和按钮,按钮命令将调用该函数并检查组合框的内容,如何获取变量“com $ num”并传递给“get_optimizer”函数?如何纠正下面的脚本?请帮助,谢谢! set num 1 foreach SQ {1 2 3 4 5} { ttk::combobox $twind.frame.dpcom$num -textvariable com$num -va

    0热度

    1回答

    我有以下伪程序里面, proc main2 {} { set mainVar 100 proc subproc1 {} { puts $mainVar } subproc1 } main2 它引发错误无法读取“mainVar”:没有这样的变量。我的问题是,如果我在proc中声明一个变量(即mainVar)不是应该可以在该proc中

    0热度

    1回答

    假设我有一个文件句柄。有没有办法让我知道它正在写入的文件的名称? 即,您通常使用: set fh [ open "fname" "w" ] 我想一个进程,将有输出: puts [ getFHFName $fh] >fname 任何想法?