Perl 数值相等运算符示例

这些也称为关系运算符。假设变量 $a 为 10，变量 $b 为 20，那么让我们检查以下数字相等运算符 -

先生。	运算符及描述
1	==（等于）检查两个操作数的值是否相等，如果相等则条件为真。示例- ($a == $b) 不成立。
2	!=（不等于）检查两个操作数的值是否相等，如果值不相等则条件成立。示例- ($a != $b) 为真。
3	<=> 检查两个操作数的值是否相等，并根据左侧参数在数值上小于、等于还是大于右侧参数，返回 -1、0 或 1。示例- ($a <=> $b) 返回 -1。
4	>（大于）检查左操作数的值是否大于右操作数的值，如果是，则条件为真。示例- ($a > $b) 不正确。
5	<（小于）检查左操作数的值是否小于右操作数的值，如果是，则条件为真。示例- ($a < $b) 为真。
6	>=（大于或等于）检查左操作数的值是否大于或等于右操作数的值，如果是，则条件为真。示例- ($a >= $b) 不成立。
7	<=（小于或等于）检查左操作数的值是否小于或等于右操作数的值，如果是，则条件为真。示例- ($a <= $b) 为真。

例子

尝试以下示例来了解 Perl 中可用的所有数字相等运算符。将以下 Perl 程序复制并粘贴到 test.pl 文件中并执行该程序。

现场演示

#!/usr/local/bin/perl
 
$a = 21;
$b = 10;

print "Value of \$a = $a and value of \$b = $b\n";

if( $a == $b ) {
   print "$a == \$b is true\n";
} else {
   print "\$a == \$b is not true\n";
}

if( $a != $b ) {
   print "\$a != \$b is true\n";
} else {
   print "\$a != \$b is not true\n";
}

$c = $a <=> $b;
print "\$a <=> \$b returns $c\n";

if( $a > $b ) {
   print "\$a > \$b is true\n";
} else {
   print "\$a > \$b is not true\n";
}

if( $a >= $b ) {
   print "\$a >= \$b is true\n";
} else {
   print "\$a >= \$b is not true\n";
}

if( $a < $b ) {
   print "\$a < \$b is true\n";
} else {
   print "\$a < \$b is not true\n";
}

if( $a <= $b ) {
   print "\$a <= \$b is true\n";
} else {
   print "\$a <= \$b is not true\n";
}

执行上述代码时，会产生以下结果 -

Value of $a = 21 and value of $b = 10
$a == $b is not true
$a != $b is true
$a <=> $b returns 1
$a > $b is true
$a >= $b is true
$a < $b is not true
$a <= $b is not true

perl_operators.htm

先生。	运算符及描述
1	==（等于）检查两个操作数的值是否相等，如果相等则条件为真。示例- ($a == $b) 不成立。
2	!=（不等于）检查两个操作数的值是否相等，如果值不相等则条件成立。示例- ($a != $b) 为真。
3	<=> 检查两个操作数的值是否相等，并根据左侧参数在数值上小于、等于还是大于右侧参数，返回 -1、0 或 1。示例- ($a <=> $b) 返回 -1。
4	>（大于）检查左操作数的值是否大于右操作数的值，如果是，则条件为真。示例- ($a > $b) 不正确。
5	<（小于）检查左操作数的值是否小于右操作数的值，如果是，则条件为真。示例- ($a < $b) 为真。
6	>=（大于或等于）检查左操作数的值是否大于或等于右操作数的值，如果是，则条件为真。示例- ($a >= $b) 不成立。
7	<=（小于或等于）检查左操作数的值是否小于或等于右操作数的值，如果是，则条件为真。示例- ($a <= $b) 为真。