在线咨询
eetop公众号 创芯大讲堂 创芯人才网
切换到宽版

EETOP 创芯网论坛 (原名:电子顶级开发网)

手机号码,快捷登录

手机号码,快捷登录

找回密码

  登录   注册  

快捷导航
搜帖子
查看: 4560|回复: 8

[求助] tcl变量置换

[复制链接]
发表于 2012-11-12 14:05:15 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

x
tcl是否支持变量的迭代置换啊,
例如: set id 23
set name_$id   aa
如何输出name_$id???
直接puts "${name_$id}" 不行。。。。
发表于 2012-11-12 17:19:21 | 显示全部楼层
本帖最后由 sjtusonic 于 2012-11-12 17:21 编辑

使用eval命令:
eval “puts \$name_$id"

借宝地问:
perl下遇到这种情况有类似的命令吗?
发表于 2012-11-12 17:20:59 | 显示全部楼层
我也是新手,如果你用数组是可以实现的:
set id 23
set name_($id) aa
puts $name_($id)
输出aa
目前只想出这一种方法
 楼主| 发表于 2012-11-12 17:35:16 | 显示全部楼层
回复 2# sjtusonic


    非常感谢,成功解决了。。。。。
发表于 2012-11-12 19:49:27 | 显示全部楼层
回复 4# omityoung


    不客气呵呵,顺便请教一下大牛们:

perl和shell下遇到这种情况有类似的命令吗?
求总结
发表于 2012-11-13 14:36:41 | 显示全部楼层
回复 5# sjtusonic


perl里面试了下,直接调用${name_$id}貌似也不行;
多用一个变量的土办法可以解决,先把$id解析出来放到$var里面,然后就可以用了,其他暂时还没有想到

$id = 23 ;
$var = "name_" . "$id" ;
$$var = aa ;

print "var \t $var \n" ;
print "\$var \t $$var \n" ;
print "name_23 \t $name_23 \n" ;
发表于 2012-11-13 15:53:31 | 显示全部楼层
回复 6# 射门靴


    原来perl里面可以“$$”这样用的! 领教了
发表于 2015-1-22 15:09:51 | 显示全部楼层
回复 2# sjtusonic


    你好!我问一下,perl如果调用tcl设置的变量。
    我是在tcl环境下,设置一个变量a。
    然后在tcl环境下,运行 perl file.pl。
    其中file.pl 文件如何能调用a?

     谢谢啦!
发表于 2015-1-22 16:34:32 | 显示全部楼层




    设置成环境变量试试看
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

站长推荐 上一条 /2 下一条

小黑屋| 关于我们| 联系我们| 在线咨询| 隐私声明| EETOP 创芯网
( 京ICP备:10050787号 京公网安备:11010502037710 )

GMT+8, 2024-4-25 12:39 , Processed in 0.037863 second(s), 5 queries , Gzip On, Redis On.

eetop公众号 创芯大讲堂 创芯人才网
快速回复 返回顶部 返回列表