匹配 Tcl 中字符串的第一个字母

Question

我想将字符串的第一个字母与已知字符进行比较。例如，我想检查字符串“example”的第一个字母是否与“e”匹配。我确信一定有一种非常简单的方法可以做到这一点，但我找不到它。

Answer 1

一种方法是获取第一个字符string index：

if {[string index $yourstring 0] eq "e"} {
    ...