TCL隨記(2)

file函數：

file dirname name 返回文件所在目錄

file exists name 測試文件是否存在，存在返回1，不然返回0

file extension name 返回文件擴展名

file join path path 合併path造成一個新路徑

file mkdir name 建立目錄

file rootname 返回不帶擴展名的文件名

file tail name 返回最有一個路徑組成部分