Was ist die effizienteste Art zu prüfen, ob ein String in TCL mit einem bestimmten Zeichen beginnt?

Question

Ich habe eine Zeichenfolge, und ich möchte überprüfen, ob es mit einem bestimmten Zeichen beginnt (# in diesem Fall). Ich würde gerne wissen, wie das am effizientesten ist!

Was ich denke, ist if {[string compare -length 1 $string "#"]}, weil es strcmp() verwenden könnte, die wahrscheinlich eine der schnellsten Möglichkeiten, dies zu erreichen ist.

Was ich denke, könnte auch möglich sein if {[string index $string 1] == "#"}, weil es * string == '#' tun könnte, die wahrscheinlich auch sehr schnell sein wird.

Was denkst du?

Answer 1

Die schnellste Methode der Überprüfung, ob eine Zeichenfolge mit einem bestimmten Zeichen beginnt, ist string match:

if {[string match "#*" $string]} { ... } 

Der Code der Anpassung zu tun sieht, dass ein Stern nach dem ersten Zeichen gibt es und dann das Ende der Schnur, und so hört auf, den Rest von $string zu untersuchen. Es erfordert auch keine Zuweisung eines Ergebnisses (außer einem booleschen, was ein Spezialfall ist, da string match auch bytecode-kompiliert ist).

Answer 2

Ja [string match "*" $ string_name] das hat bei mir funktioniert. Dies ist sehr schnell im Vergleich zu Regexp oder einem anderen Dienstprogramm.