string - 在 TCL 中拆分字符串

Question

我正在我们的 F5 服务器上编写 iRule，但在 TCL 方面我是一个完整的初学者。

我有一个HTTP::host包含以下格式的主机名的变量：application-dev.com

我要做的就是在出现连字符的地方拆分这个字符串，并将第一部分和第二部分设置为单独的变量。所以我最终会这样：

variable1 = application
variable2 = dev.com

我已经做到了这一点：

set hostSections [split [HTTP::host] "-"]

但找不到有关如何将部分分配给单独变量的任何信息

Answer 1

您可以将lindex(list index) 用于旧版本的 Tcl：

set variable1 [lindex $hostSections 0]
set variable2 [lindex $hostSections 1]

由于列表是 0 索引的，0因此将指示列表的第一个元素。

在 Tcl 8.5 及更高版本中，您可以使用lassignwhich 使事情变得更短：

lassign [split [HTTP::host] "-"] variable1 variable2

两种方式都将值存储在变量名variable1和variable2.