Tcl 关系运算符|极客教程

Tcl 关系运算符

下表显示了Tcl语言支持的所有关系运算符。假设变量 A 的值为10，变量 B 的值为20，那么结果如下：

操作符	描述	示例
`==`	检查两个操作数的值是否相等，如果是，则条件为真。	`(A == B)` 不是真的。
`!=`	检查两个操作数的值是否不相等，如果值不相等，则条件变为真。	`(A != B)` 是真的。
`>`	检查左操作数的值是否大于右操作数的值，如果是，则条件为真。	`(A > B)` 不是真的。
`<`	检查左操作数的值是否小于右操作数的值，如果是，则条件为真。	`(A < B)` 是真的。
`>=`	检查左操作数的值是否大于等于右操作数的值，如果是，则条件为真。	`(A >= B)` 不是真的。
`<=`	检查左操作数的值是否小于等于右操作数的值，如果是，则条件为真。	`(A <= B)` 是真的。

示例

尝试下面的示例来了解Tcl语言中所有可用的关系运算符 –

#!/usr/bin/tclsh

set a 21
set b 10

if { a ==b } {
   puts "Line 1 - a is equal to b\n"
} else {
   puts "Line 1 - a is not equal to b\n" 
}
if { a<b } {
   puts "Line 2 - a is less than b\n"
} else {
   puts "Line 2 - a is not less than b\n"
}
if { a>b } {
   puts "Line 3 - a is greater than b\n"
} else {
   puts "Line 3 - a is not greater than b\n"
}
# Lets change value of a and b
set a 5
set b 20
if { a <=b } {
   puts "Line 4 - a is either less than or equal to  b\n"
}
if { b >=a } {
   puts "Line 5 - b is either greater than  or equal to a\n"
}

当您编译并执行上述程序时，会产生以下结果−

Line 1 - a is not equal to b

Line 2 - a is not less than b

Line 3 - a is greater than b

Line 4 - a is either less than or equal to  b

Line 5 - b is either greater than  or equal to a