Tcl - 内置函数

---

Tcl 提供了许多内置函数（过程）用于各种操作。这包括 -

• 列表处理函数。

• 用于字符串处理的函数。

• 用于数组处理的函数。

• 字典处理函数。

• 文件 I/O处理函数。

• 用于创建命名空间和包的函数。

• 数学运算函数。

• 系统操作功能。

除数学和系统函数外，上述所有内容都在前面的章节中介绍过。数学和系统内置函数解释如下。

数学函数

下表列出了 Tcl 中可用的数学函数 -

下面给出了一些使用数学函数的示例 -

#!/usr/bin/tclsh

namespace import ::tcl::mathfunc::*
puts [tan 10]
puts [pow 10 2]
puts [ceil 10.34]
puts [hypot 10 20]
puts [srand 45]
puts [log 10]
puts [srand 45]

执行上述代码时，会产生以下结果 -

0.6483608274590866
100.0
11.0
22.360679774997898
0.0003521866166741525
2.302585092994046
0.0003521866166741525

系统功能

Tcl 中的重要系统函数包括：

• 时钟- 秒函数，返回当前时间（以秒为单位）。

• 时钟- 格式函数，将秒格式化为日期和时间。

• 时钟- 扫描函数，扫描输入字符串并将其转换为秒。

• open - 函数，用于打开文件。

• exec - 函数，用于执行系统命令。

• close - 函数，用于关闭文件。

下面列出了上述函数的一些示例 -

#!/usr/bin/tclsh

#get seconds
set currentTime [clock seconds]
puts $currentTime
#get format 
puts "The time is: [clock format $currentTime -format %H:%M:%S]"
puts "The date is: [clock format $currentTime -format %D]"

set date "Jun 15, 2014"
puts [clock scan $date -format {%b %d, %Y}]

puts [exec ls]
puts [exec dir]

set a  [open input.txt]
puts [read $a];
puts $a
close $a

执行上述代码时，会产生以下结果 -

1402819756
The time is: 03:09:16
The date is: 06/15/2014
1402808400
input.txt
main.tcl
input.txt  main.tcl
This is the file you can use to provide input to your program and later on open
   it inside your program to process the input.

file3

下表提供了可用于格式化日期和时间的列表字符串。