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 中重要的系统函数包括：

• clock - seconds 函数，返回以秒为单位的当前时间。

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

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

• 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

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