Tcl：什麼是檢查空白字符串的最快方法

Question

檢查空白字符串的最快方法是什麼？

• [string eq $s ""]
• [string compare $s ""]
• [expr $s == ""]
• [regexp ^$ $s]

Answer 1

我期望之一：

string equal $s "" 

或

expr {$s eq ""} 

將是最快的;這兩種情況會產生幾乎相同的字節碼，所以我不希望區分它們。

Answer 2

proc check {} { 
set s {} 
puts "string equal ->[time {string eq $s ""} 100000]" 
puts "string compare ->[time {string compare $s ""} 100000]" 
puts "regexp   ->[time {regexp ^$ $s} 100000]" 
puts "expr ==  ->[time {expr {$s == ""}} 100000]" 
puts "expr eq  ->[time {expr {$s eq ""}} 100000]" 
} 
check ; # See the behavior in your PC