| 操作符 | 描述 |
| 小于 | |
| > | 大于 |
| == | 等于 |
| = | 小于等于 |
| >= | 大于等于 |
| != | 不等于 |
| => | 比较，返回 1, 0, -1 |
| 操作符 | 描述 | |
| lt | 小于 | |
| gt | 大于 | |
| eq | 等于 | |
| le | 小于等于 | |
| ge | 大于等于 | |
| ne | 不等于 | |
| cmp | 比较，返回 1, 0, or -1 |
| 操作符 | 描述 |
| = | 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 |
| 表达式 | 等效表达式 |
| $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; |
七、自增自减运算符 ：++、--
.不要在变量两边都使用此种操作符：++$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
**
Right-to-left
=~, !~
Left-to-right
*, /, %, x
Left-to-right
+, -, .
Left-to-right
, >>
Left-to-right
-e, -r,
无
, =, >, >=, lt, le, gt, ge
Left-to-right
==, !=, =>, eq, ne, cmp
Left-to-right
Left-to-right
|, ^
Left-to-right
Left-to-right
||
Left-to-right
..
Left-to-right
? and :
Right-to-left
=, +=, -=, *=,
Right-to-left
and so on
,
Left-to-right
not
Left-to-right
and
Left-to-right
or, 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 |
三、数值（Number Values）运算符
| 符号 | 范例 | 说明 |
| > | $x>$y | 如果$x大于$y返回1否则返回0 |
| >= | $x>=$y | 如果$x大于等于$y返回1否则返回0 |
| $x$y | 如果$x小于$y返回1否则返回0 | |
| = | $x=$y | 如果$x小于等于$y返回1否则返回0 |
| == | $x==$y | 如果$x等于$y返回1否则返回0 |
| != | $x!=$y | 如果$x不等于$y返回1否则返回0 |
| => | $x=>$y | 如果$x大于$y返回1;如果$x等于$y返回0; 如果$x小于$y则返回-1 |
四、字符串（String Values）运算符
| 符号 | 范例 | 说明 |
| gt | $str1 gt $str2 | 如果$str1大于$str2返回1否则返回0 |
| ge | $str1 ge $str2 | 如果$str1大于等于$str2返回1否则返回0 |
| lt | $str1 lt $str2 | 如果$str1小于$str2返回1否则返回0 |
| le | $str1 le $str2 | 如果$str1小于等于$str2返回1否则返回0 |
| eq | $str1 eq $str2 | 如果$str1等于$str2返回1否则返回0 |
| ne | $str1 ne $str2 | 如果$str1不等于$str2返回1否则返回0 |
| cmp | $str1 cmp $str2 | 如果$str1大于$str2返回1;如果$str1=$str2返回0; 如果$str1小于$str2则返回-1 |
五、逻辑（Logical）运算符
1.$x $y(AND)
| $x | $y | 结果 |
| 真(True) | 真(True) | 真(True) |
| 真(True) | 假(False) | 假(False) |
| 假(False) | 真(True) | 假(False) |
| 假(False) | 假(False) | 假(False) |
1.$x || $y(OR)
| $x | $y | 结果 |
| 真(True) | 真(True) | 真(True) |
| 真(True) | 假(False) | 真(True) |
| 假(False) | 真(True) | 真(True) |
| 假(False) | 假(False) | 假(False) |
1.! $x(Not)
| $x | 结果 |
| 真(True) | 假(False) |
| 假(False) | 真(True) |
六、其他运算符
| 指令： | ..区域运算符（Range Operator） | |
| 说明： | 这个运算符是Perl语言中特别有用运算符且很实用。 | |
| 范例： | ||
| @digits=(1..9); | #这时@digits=(1,2,3,4,5,6,7,8,9); | |
| @digits=('01'..'05'); | #这时@digits=(01,02,03,04,05); | |
| @char=('A'..'E'); | #这时@char=(A,B,C,D,E); | |
| @total=(1..3,'A'..'B'); | #这时@totalr=(1,2,3'A','B'); | |
| 指令： | 判断运算式？运算式1：运算式2条件运算符 | |
| 说明： | 这个运算符的意义和C语言一样，如果判断运算式的值是真的 话，则做运算1的运算，如果判断运算式是假的话，则做运算式 2的运算。 | |
| 范例： | ||
| $price=($age>60)?100:200; | ||
| 如果$age大于60的话，则$price等于100;否则$price等于200。 | ||
七、常用的文件数据(File test)运算符
| 范例 | 说明 |
| -r $file | 如果$file是可读取的话，返回1的值 |
| -w $file | 如果$file是可写入的话，返回1的值 |
| -x $file | 如果$file是可执行的话，返回1的值 |
| -e $file | 如果$file存在的话，返回1的值 |
| -o $file | 如果$file是被执行者所拥有的话，返回1的值 |
| -s $file | 返回$file的文件大小(bytes) |
| -f $file | 如果$file是正常文件的话，返回1的值 |
| -t $file | 如果$file是文本文件的话，返回1的值 |
| -b $file | 如果$file是binary文件的话，返回1的值 |
| -m $file | 返回文件最后一次更改时间到现在的日期数 |
咨 询 客 服