TCL經常使用命令

1.刪除文件

　　file delete A

　　file delete -force A

2.創建文件夾

　　file mkdir A

　　file mkdir A/A

3.判斷文件夾是否存在

　　file exist A

 4.複製文件

　　file copy A B

5.函數

　　proc fun {args} {

　　puts $args

}

　　fun "hello"