Perl-numeric-equality-operators-example

Perlの数値等価演算子の例

これらは関係演算子とも呼ばれます。 変数$ aが10を保持し、変数$ bが20を保持すると仮定して、次の数値等式演算子をチェックします-

Sr.No.	Operator & Description
1	== (equal to) 2つのオペランドの値が等しいかどうかを確認し、等しい場合は条件が真になります。 例-（$ a == $ b）は正しくありません。
2	!= (not equal to) 2つのオペランドの値が等しいかどうかをチェックし、値が等しくない場合は条件が真になります。 例-（$ a！= $ b）はtrueです。
3	<⇒ 2つのオペランドの値が等しいかどうかをチェックし、左の引数が右の引数より数値的に小さいか、等しいか、大きいかによって-1、0、または1を返します。 例-（$ a <⇒ $ b）は-1を返します。
4	> (greater than) 左のオペランドの値が右のオペランドの値よりも大きいかどうかをチェックし、そうであれば条件が真になります。 例-（$ a> $ b）は正しくありません。
5	< (less than) 左のオペランドの値が右のオペランドの値よりも小さいかどうかを確認し、そうであれば条件が真になります。 例-（$ a <$ b）は真です。
6	>= (greater than or equal to) 左のオペランドの値が右のオペランドの値以上かどうかをチェックし、はいの場合は条件が真になります。 例-（$ a> = $ b）は正しくありません。
7	⇐ (less than or equal to) 左のオペランドの値が右のオペランドの値以下かどうかをチェックし、そうであれば条件が真になります。 例-（$ a ⇐ $ b）はtrueです。

例

次の例を試して、Perlで使用可能なすべての数値等価演算子を理解してください。 test.plファイルに次のPerlプログラムをコピーして貼り付け、このプログラムを実行します。

#!/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