#! /usr/bin/perl
$var1 = 20;
$var2 = 15;
print ("var1 = ", $var1, "\n");
print ("var2 = ", $var2, "\n");
# Comparing numbers
print ("var1 == var2 : ", ($var1 == $var2), "\n");
print ("var1 != var2 : ", ($var1 != $var2), "\n");
print ("var1 < var2 : ", ($var1 < $var2), "\n");
print ("var1 <= var2 : ", ($var1 <= $var2), "\n");
print ("var1 > var2 : ", ($var1 > $var2), "\n");
print ("var1 >= var2 : ", ($var1 >= $var2), "\n");
print ("var1 >= var2 : ", ($var1 <=> $var2), "\n");
当跑到程序之上时,我得到以下输出。
$ ./comparisonOperators
var1 = 20
var2 = 15
var1 == var2 :
var1 != var2 : 1
var1 < var2 :
var1 <= var2 :
var1 > var2 : 1
var1 >= var2 : 1
var1 >= var2 : 1
我的问题,为什么我没有得到任何var1 == var2,var1&lt;的结果? var2,var1&lt; = var2,以及为什么比较运算符返回1而不是True / False。