TCL脚本语言学习__文件访问（五）

       TCL提供了丰富的文件操作的命令。通过这些命令你可以对文件名进行操作(查找匹配某一模式的文件)、以顺序或随机方式读写文件、检索系统保留的文件信息（如最后访问时间)。

1.文件名

       TCL中文件名和我们熟悉的windows表示文件的方法有一些区别：在表示文件的目录结构时它使用'/'，而不是'\'，这和TCL最初是在UNIX下实现有关。比如C盘tcl目录下的文件sample.tcl在TCL中这样表示： C:/tcl/sample.tcl。

2.2 基本文件输入输出命令

     这个名为tgrep的过程，可以说明TCL文件I/O的基本特点：

proc tgrep { pattern filename} {
set f [open $filename r]
while { [gets $f line ] } {
if {[regexp $pattern $line]} {
puts stdout $line
}
}
close $f
}

 以上过程象UNIX的grep命令， 用两个参数调用它，一个是模式，另一个是文件名， tgrep将打印出文件中所有匹配该模式的行。

基本的文件输入输出命令
open name ?access?
open命令 以access方式打开文件name。返回供其他命令(gets,close等)使用的文件标识。 如果name的第一个字符是“|”，管道命令被触发，而不是打开文件。
文件的打开方式和我们熟悉的C语言类似，有以下方式：
r 只读方式打开。文件必须已经存在。这是默认方式。
r+ 读写方式打开，文件必须已经存在。
w 只写方式打开文件，如果文件存在则清空文件内容，否则创建一新的空文件。
w+读写方式打开文件，如文件存在则清空文件内容，否则创建新的空文件。
a 只写方式打开文件，文件必须存在，并把指针指向文件尾。
a+ 读写方式打开文件，并把指针指向文件尾。如文件不存在，创建新的空文件。

open 命 令 返回一个字符串用于表示打开的文件 。当调用别的命令（如 ：gets,puts,close，〕对打开的文件进行操作时，就可以使用这个文件标识符。

TCL有三个特定的文件标识： stdin,stdout和stderr ，分别对应标准输入、标准输出和错误通道，任何时候你都可以使用这三个文件标识。