一、算术运算符 ：+(加)、-(减)、*(乘)、/(除)、**(乘幂)、%(取余)、-(单目负)
? (1)乘幂的基数不能为负，如 (-5) ** 2.5 # error；
? (2)乘幂结果不能超出计算机表示的限制，如10 ** 999999 # error
? (3)取余的操作数如不是整数，四舍五入成整数后运算；运算符右侧不能为零
? (4)单目负可用于变量： - $y ; # 等效于 $y * -1
? (5)对应有 +=、-=、*=、/=、**=、%=
二、整数比较运算符
Table 1. 整数比较运算符
| 操作符
|
描述
|
<
| 小于
|
>
| 大于
|
==
| 等于
|
<=
| 小于等于
|
>=
| 大于等于
|
!=
| 不等于
|
<=>
| 比较，返回 1,?-1
|
操作符<=>结果为：?
0 - 两个值相等?1 - 第一个值大?
1 - 第二个值大?
三、字符串比较运算符?Table 2. 字符串比较运算符
| 操作符
|
描述
|
|
| lt
|
小于
|
gt
|
大于
|
eq
|
等于
|
le
|
小于等于
|
ge
|
大于等于
|
ne
|
不等于
|
cmp
|
|
四、逻辑运算符逻辑或：$a || $b 或 $a or $b?逻辑与：$a && $b 或 $a and $b?
逻辑非：! $a 或 not $a?
逻辑异或：$a xor $b?
五、位运算符
位与：&?位或：|?
位非：~?
位异或：^?
左移：$x << 1?
右移：$x >> 2?
注：不要将&用于负整数，因为PERL将会把它们转化为无符号数。?
六、赋值运算符
Table 3. 赋值运算符
| 操作符
|
描述
|
| =
|
Assignment only
|
| +=
|
Addition and assignment
|
| -=
|
Subtraction and assignment
|
| *=
|
Multiplication and assignment
|
| /=
|
Division and assignment
|
| %=
|
Remainder and assignment
|
| **=
|
Exponentiation and assignment
|
| &=
|
Bitwise AND and assignment
|
| |=
|
Bitwise OR and assignment
|
| ^=
|
Bitwise XOR and assignment
|
Table 4. 赋值运算符例子
| 表达式
|
等效表达式
|
| $a = 1;
|
none (basic assignment)
|
| $a -= 1;
|
$a = $a - 1;
|
| $a *= 2;
|
$a = $a * 2;
|
| $a /= 2;
|
$a = $a / 2;
|
| $a %= 2;
|
$a = $a % 2;
|
| $a **= 2;
|
$a = $a ** 2;
|
| $a &= 2;
|
$a = $a & 2;
|
| $a |= 2;
|
$a = $a | 2;
|
| $a ^= 2;
|
$a = $a ^ 2;
|
注：1. =可在一个赋值语句中出现多次，如：
? $value1 = $value2 = "a string";
2. =作为子表达式
? ($a = $b) += 3;
? 等价于
? $a = $b;
? $a += 3;
七、自增自减运算符 ：++、--
.不要在变量两边都使用此种操作符：++$var-- # error
.不要在变量自增/减后在同一表达式中再次使用：$var2?? = $var1 + ++$var1; # error
.在PERL中++可用于字符串，但当结尾字符为'z'、'Z'、'9'时进位，如：
? $stringvar = "abc";
? $stringvar++; # $stringvar contains "abd" now
? $stringvar = "aBC";
? $stringvar++; # $stringvar contains "aBD" now
? $stringvar = "abz";
? $stringvar++; # $stringvar now contains "aca"
? $stringvar = "AGZZZ";
? $stringvar++; # $stringvar now contains "AHAAA"
? $stringvar = "ab4";
? $stringvar++; # $stringvar now contains "ab5"
? $stringvar = "bc999";
? $stringvar++; # $stringvar now contains "bd000"?
.不要使用--，PERL将先将字符串转换为数字再进行自减
? $stringvar = "abc";
? $stringvar--; # $stringvar = -1 now
.如果字符串中含有非字母且非数字的字符，或数字位于字母中，则经过++运算前值转换为数字零，因此结果为1，如：
? $stringvar = "ab*c";
? $stringvar++;
? $stringvar = "ab5c";
? $stringvar++;
八、字符串联结和重复运算符
? 1. 联接: .
? 2. 重复：x
? 3. 联接且赋值(类似+=)： .=
例：
? $newstring = "potato" . "head";
? $newstring = "t" x 5;
? $a = "be";
? $a .= "witched"; # $a is now "bewitched"
九、逗号运算符
? 其前面的表达式先进行运算，如：
? $var1 += 1,$var2 = $var1;
? 等价于
? $var1 += 1;
? $var2 = $var1;
? 使用此操作符的唯一理由是提高程序的可读性，将关系密切的两个表达式结合在一起，如：
? $val = 26;
? $result = (++$val,$val + 5); # $result = 32
? 注意如果此处没有括号则意义不同：
? $val = 26;
? $result = ++$val,$val + 5; # $result = 27
十、条件运算符
? 与C中类似，条件?值1:值2，当条件为真时取值1，为假时取值2，如：
? $result = $var == 0 ? 14 : 7;
? $result = 43 + ($divisor == 0 ? 0 : $dividend / $divisor);
? PERL 5中，还可以在赋值式左边使用条件操作符来选择被赋值的变量，如：
? $condvar == 43 ? $var1 : $var2 = 14;
? $condvar == 43 ? $var1 = 14 : $var2 = 14;
十一、运算符的优先级
Table 5. 运算符的优先级
| 操作符
|
++,?--
|
自增，自减
|
-,?~,?!
| 单目
|
**
| 乘方
|
=~,?!~
| 模式匹配
|
*,?/,?%,?x
| 乘，除，取余，重复
|
+,?-,?.
| 加，减，联接
|
<<,?>>
| 移位
|
-e,?-r,etc.
| 文件状态
|
<,?<=,?>,?>=,?lt,?le,?gt,?ge
| 不等比较
|
==,?!=,?<=>,?eq,?ne,?cmp
| 相等比较
|
&
| 位与
|
|,?^
| 位或，位异或
|
&&
| 逻辑与
|
||
| 逻辑或
|
..
| 列表范围
|
??and?:
| 条件操作符
|
=,?+=,?-=,?*=,
| 赋值
|
and so on
|
,
| 逗号操作符
|
not
| Low-precedence logical NOT
|
and
| Low-precedence logical AND
|
or,?xor
| Low-precedence logical OR and XOR
|
运算符结合性(associativity)：?Table 6. 运算符结合性
| 操作符
|
结合性
|
| --
|
无
|
| !
|
Right-to-left
|
| **
|
!~
|
Left-to-right
|
| x
|
.
|
>>
|
ge
|
cmp
|
&
|
^
|
&&
|
||
|
..
|
??and?:
|
and so on
|
|
| not
|
and
|
xor
|
Left-to-right
|
PERL运算符简单应用
一、赋值（Assignment）运算符
| 符号
|
范例
|
说明
|
| = |
$x=$y; |
把$x的值赋给$y |
| += |
$x+=$y; |
$x=$x+$y;把$x加上$y后再赋值给$x |
| -= |
$x-=$y; |
$x=$x-$y;把$x减$y后再赋值给$x |
| *= |
$x*=$y; |
$x=$x*$y;把$x乘$y后再赋值给$x |
| /= |
$x/=$y; |
$x=$x/$y;把$x除$y次方后再赋值给$x |
| **= |
$x**=$y; |
$x=$x* *$y;求出$x乘$y次方后再赋值给$x |
| %= |
$x%=$y; |
$x=$x%$y;把$x除以$y的余数后再赋值给$x |
| .= |
$str1.=$str2; |
$str1=$str1.$str2;把$str1这个字符串再加上$str2这个字符串后再赋值给$str这个字符
串 |
| x= |
$str x=$y; |
$str=$str x $y;循环$str字符$y次再把结果赋值给
$str这个字符串 |
二、运算（Arithmetic）运算符
| 符号
|
范例
|
说明
|
| + |
$a=$x+$y |
把$x和$y加后再赋值给$a |
| - |
$a=$x+$y |
把$x和$y减后再赋值给$a |
| * |
$a=$x*$y |
把$x和$y乘后再赋值给$a |
| / |
$a=$x/$y |
把$x和$y除后再赋值给$a |
| % |
$a=$x%$y |
把$x和$y除后再余数赋值给$a |
| ** |
$a=$x**$y |
把$x和$y乘次方后再赋值给$a |
| ++ |
$x++;++$x |
把$x加一后再赋值给$x |
| -- |
$x--;--$x |
把$x减一后再赋值给$x |
| . |
$a=$x.$y |
把$x字符串和$y字符串合拼后再赋值给$a |
