极客教程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