TCL数组
数组是一组使用索引对应元素的排列方式。常规数组的语法如下所示。
set ArrayName(Index) value
用于创建简单数组的例子,如下所示。
#!/usr/bin/tclsh set languages() Tcl
set languages() "C Language"
puts $languages()
puts $languages()
当上述代码被执行时,它会产生以下结果。
Tcl
C Language
数组大小
用于计算数组大小的语法,如下所示。
[array size variablename]
用于打印数组的大小的示例如下所示。
#!/usr/bin/tclsh set languages() Tcl
set languages() "C Language"
puts [array size languages]
当上述代码被执行时,它会产生以下结果。
2
数组迭代
虽然数组索引可以是非连续的,像索引1,然后索引10等指定的值。但是如果它们是连续的,我们可以用数组迭代访问数组的元素。一个简单的数组迭代的打印元素,如下所示。
#!/usr/bin/tclsh set languages() Tcl
set languages() "C Language"
for { set index } { $index < [array size languages] } { incr index } {
puts "languages($index) : $languages($index)"
}
当上述代码被执行时,它会产生以下结果。
languages() : Tcl
languages() : C Language
关联数组
在TCL,所有数组本质是相关联的。数组存储并没有任何具体的顺序进行检索。关联数组使用索引但不一定都是数字。一个简单的例子,关联数组与非数字索引如下所示。
#!/usr/bin/tclsh set personA(Name) "Dave"
set personA(Age)
puts $personA(Name)
puts $personA(Age)
当上述代码被执行时,它会产生以下结果。
Dave
数组的索引
用于检索数组索引的语法如下所示。
[array names variablename]
用于打印数组的大小的示例如下所示。
#!/usr/bin/tclsh set personA(Name) "Dave"
set personA(Age)
puts [array names personA]
当上述代码被执行时,它会产生以下结果。
Age Name
关联数组迭代
可以使用数组的索引来遍历数组。如下例子所示。
#!/usr/bin/tclsh set personA(Name) "Dave"
set personA(Age)
foreach index [array names personA] {
puts "personA($index): $personA($index)"
}
当上述代码被执行时,它会产生以下结果。
personA(Age):
personA(Name): Dave
TCL数组的更多相关文章
- TCL语言笔记:TCL中的数组
一.介绍 Tcl 中的数组和其他高级语言的数组有些不同:Tcl 数组元素的索引,或称键值,可以是任意的字符串,而且其本身没有所谓多维数组的概念.数组的存取速度要比列表有优势,数组在内部使用散列表来存储 ...
- tcl之变量-unset 简单变量和数组
- tcl之变量-数组array
- Tcl internal variables
Tcl internal variables eryar@163.com 在Tcl中内置了一些变量,并赋予了一定的功能.内置变量列表如下: 变量名称 功能描述 argc 指命令行参数的个数. argv ...
- TCL校园招聘——软件开发工程师(java) 只招5个。。。
简介 TCL集团股份有限公司创立于1981年,是全球性规模经营的消费类电子企业集团之一,广州2010年亚运会合作伙伴,总部位于广东省惠州市仲恺高新区TCL科技大厦.旗下拥有TCL集团.TCL多媒体科技 ...
- TCL/Expect交互式自动化测试概要 - - ITeye技术网站
TCL/Expect交互式自动化测试概要 - - ITeye技术网站 expect是一种基于TCL,能与交互式程序进行"可程序化"会话的脚本语言,是一种可以提供"分支和嵌 ...
- php文件格式数组
一个文件格式对应的数组$mime_types = array('gif' => 'image/gif','jpg' => 'image/jpeg','jpeg' => 'image/ ...
- Tcl学习之--语法|变量
[语法|变量] l 脚本.命令和单词 Tcl提供了大约100条命令.Tk提供了另外几十条,脚本包括一条或多条,通过换行符或分号分隔开. set a 12 set b 23 也能够写成一行: set a ...
- Tcl语言笔记之一
1,一个TCL脚本可以包含一个或多个命令.命令之间必须用换行符或分号隔开 2,置换 substitution %set y x+100 // ...
随机推荐
- BZOJ 3676 【APIO2014】 回文串
题目链接:回文串 我终于也会回文自动机辣! 其实吗……我觉得回文自动机(听说这玩意儿叫\(PAM\))还是比较\(simple\)的……至少比\(SAM\)友善多了…… 所谓回文自动机,每个节点就代表 ...
- ssh connection refused
执行sudo apt-get install openssh-server命令安装SSH服务
- a标签 在新页面打开
<a href="https://www.baidu.com/" target="_blank">下载</a>
- Mac adb 安装
一.下载Android studio https://developer.android.google.cn/studio/ 二.安装 首先移动 弹出下面弹框,直接点击OK 提示无法访问Android ...
- Intel Omin-Path Architecture 搭建调优与测试
OPA在Centos上的搭建 1. 首先确认Omni-Path Host Fabric Interfaces (HFIs) # yum install –y pciutils # lspci -vv ...
- 递归--练习11--noi9273 PKU2506Tiling
递归--练习11--noi9273 PKU2506Tiling 一.心得 25 a[i]%=10;(高精度时) 26 这里错了,花了好久改好 27 28 29 int* f(int n){ 30 if ...
- WPF特效和例子
https://www.cnblogs.com/AaronYang/p/4710428.html
- Java开源-astar:A 星算法
astar A星算法Java实现 一.适用场景 在一张地图中,绘制从起点移动到终点的最优路径,地图中会有障碍物,必须绕开障碍物. 二.算法思路 1. 回溯法得到路径 (如果有路径)采用“结点与结点的父 ...
- cocos creator开发微信小游戏记录
先用cocoscreator实现游戏逻辑 在cocoscreator项目里可以调用微信小游戏api 在cocos里面判断小游戏的运行环境 if (cc.sys.platform === cc.sys. ...
- UVA 11624 Fire! bfs 难度:0
http://uva.onlinejudge.org/index.php?option=com_onlinejudge&Itemid=8&page=show_problem&p ...