当前位置: 首页 > 文档资料 > Perl 入门教程 >

Show Example 3

优质
小牛编辑
140浏览
2023-12-01

以下是股权经营者名单。 假设变量$ a持有“abc”而变量$ b持有“xyz”然后,让我们检查以下字符串相等运算符 -

Sr.No.操作符和说明
1

lt

如果left参数的字符串小于右参数,则返回true。

Example - ($ a lt $ b)为true。

2

gt

如果左参数的字符串大于右参数,则返回true。

Example - ($ a gt $ b)为false。

3

le

如果左参数stringwise小于或等于right参数,则返回true。

Example - ($ a le $ b)为真。

4

ge

如果左参数的字符串大于或等于右参数,则返回true。

Example - ($ a ge $ b)为false。

5

eq

如果左参数的字符串等于右参数,则返回true。

Example - ($ a eq $ b)为false。

6

ne

如果left参数stringwise不等于right参数,则返回true。

Example - ($ a ne $ b)为真。

7

cmp

返回-1,0或1,具体取决于左参数是否是字符串小于,等于或大于右参数。

Example - ($ a cmp $ b)为-1。

例子 (Example)

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

#!/usr/local/bin/perl
$a = "abc";
$b = "xyz";
print "Value of \$a = $a and value of \$b = $b\n";
if( $a lt $b ) {
   print "$a lt \$b is true\n";
} else {
   print "\$a lt \$b is not true\n";
}
if( $a gt $b ) {
   print "\$a gt \$b is true\n";
} else {
   print "\$a gt \$b is not true\n";
}
if( $a le $b ) {
   print "\$a le \$b is true\n";
} else {
   print "\$a le \$b is not true\n";
}
if( $a ge $b ) {
   print "\$a ge \$b is true\n";
} else {
   print "\$a ge \$b is not true\n";
}
if( $a ne $b ) {
   print "\$a ne \$b is true\n";
} else {
   print "\$a ne \$b is not true\n";
}
$c = $a cmp $b;
print "\$a cmp \$b returns $c\n";

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

Value of $a = abc and value of $b = xyz
abc lt $b is true
$a gt $b is not true
$a le $b is true
$a ge $b is not true
$a ne $b is true
$a cmp $b returns -1