Arthur叔叔

今天幫老婆處理 NB 的問題，她的 Win 10 無法使用左右分割視窗的功能。花了不少時間才解決，原來是她的多視窗工作模式沒有開啟。設定位於 [ 開始 ] -> [設定] -> [多工] ，開啟下圖中的紅框處即可。

近來又得重新投入 Tcl Script 的懷抱，花了幾天重新複習了一下，手感也慢慢地回來了。透過幾天的溫習，順手做個紀錄

Variable : set / unset command

% set var 5  ;# 設定變數 var 的 vlaue 為 5
5 
% puts $var  ;# 列印變數 var
5 
% unset var  ;# 刪除變數 var
% puts $var  ;# 列印變數 var, 因為不存在所以出現錯誤訊息 Can't read "var": no such variable
can't read "var": no such variable

Command Substitution

% set len [string length test123]   ;# 將 [string length test123] 的結果設定到變數 len
7

上面範例中的 [string length test123] 稱為 nested command，透過 [ ] 做區分。nested command 可支援多階層(參考下面 expr command 範例)，但考量到程式的可讀性，個人建議約 3~4 階層。

Math Expressions : expr command

% set xylist [list  [list 10 20] [list 30 40]]
{10 20} {30 40}
% set distance [expr 100 - [lindex [lindex $xylist 0] 1]]  ;#nested command example
80

另外，整數與浮點數的分別是透過"是否有加小數"來做區分，如下面犯列說明

% expr 1/3  ;# 被除數和除數皆為整數，會得到一個整數的結果
0
% expr 1/3.0 ;# 若被除數或除數之中有一個浮點數，則會得到一個浮點數的結果
0.333333333333
% expr 1.0 /3 ;# 若被除數或除數之中有一個浮點數，則會得到一個浮點數的結果
0.333333333333

若有精度(取小數點以下幾位)的需求，則可以透過 tcl_precision 這個變數來定義。請參閱下列範例

% expr 1 / 3.0
0.333333333333
% set tcl_precision 3 ;# 將精度設為小數點下三位
3
% expr 1 / 3.0
0.333
% 

Backslash Substitution

Backslash, "\", 反斜線，這個符號再 tcl script 中有兩種使用方式；一種是用來顯示特殊字元，另外一種則用來分割太長的單行指令或增加程式的可讀性。

% set var 123
123
% puts "\$var = $var"
$var = 123
% set mathGrade [list [list Arthur 100] \
               [list Emily 99 ]  \
              [list Merisa 98 ] \
              [list sean 80 ]]
{Arthur 100} {Emily 99} {Merisa 98} {sean 80}
% 

Double Quotes  and  Brace

常常用到的指令，在這裡做個紀錄。

想從特定檔案中尋找關鍵字，可以使用 -r 搭配 --include 指定檔案類型：

# 在目前工作目錄下所有 *.pl中尋找關鍵字 grep
grep -r --include="*.pl" grep .