Perl 教程 之 Perl 运算符 9

Perl 运算符

运算符优先级

下表列出了 Perl 语言的运算符优先级：

运算符符 结合性
++, -- 无
-, ~, ! 从右到左
* 从右到左
=~, !~ 从左到右 , /, %, x 从左到右
+, -, . 从左到右
<<, >> 从左到右
-e, -r, 无
<, <=, >, >=, lt, le, gt, ge 从左到右
==, !=, <=>, eq, ne, cmp 从左到右
& 从左到右
|, ^ 从左到右
&& 从左到右
|| 从左到右
.. 从左到右
? and : 从右到左
=, +=, -=, *=, 从右到左
其他
, 从左到右
not 从左到右
and 从左到右
or, xor 从左到右

实例

!/usr/bin/perl

$a = 20;
$b = 10;
$c = 15;
$d = 5;
$e;

print "\$a = $a, \$b = $b, \$c = $c ，\$d = $d\n";

$e = ($a + $b) $c / $d;
print "(\$a + \$b) \$c / \$d = $e\n";

$e = (($a + $b) $c )/ $d;
print "((\$a + \$b) \$c) / \$d = $e\n";

$e = ($a + $b) ($c / $d);
print "(\$a + \$b) (\$c / \$d ) = $e\n";

$e = $a + ($b $c ) / $d;
print "\$a + (\$b \$c )/ \$d = $e\n";

以上程序执行输出结果为：

$a = 20, $b = 10, $c = 15 ，$d = 5
($a + $b) $c / $d = 90
(($a + $b) $c) / $d = 90
($a + $b) ($c / $d ) = 90
$a + ($b $c )/ $d = 50