perl运算符

一、算术运算符：+(加)、-(减)、*(乘)、/(除)、**(乘幂)、%(取余)、-(单目负) (1)乘幂的基数不能为负，如 (-5) ** 2.5 # error；

(2)乘幂结果不能超出计算机表示的限制，如10 ** 999999 # error

(3)取余的操作数如不是整数，四舍五入成整数后运算；运算符右侧不能为零 (4)单目负可用于变量： - $y ; # 等效于 $y * -1 (5)对应有 +=、-=、*=、/=、**=、%=

二、整数比较运算符

Table 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

描述 小于 大于 等于 小于等于 大于等于 不等于

比较，返回 1, 0, or -1

描述 小于 大于 等于 小于等于 大于等于 不等于

比较，返回 1, 0, -1

五、位运算符 位与：& 位或：| 位非：~ 位异或：^ 左移：$x << 1 右移：$x >> 2

注：不要将&用于负整数，因为PERL将会把它们转化为无符号数。 六、赋值运算符

Table 3. 赋值运算符

操作符 = += -= *= /= %= **= &= |= ^=

Table 4.赋值运算符例子

表达式 $a = 1; $a -= 1; $a *= 2; $a /= 2; $a %= 2; $a **= 2; $a &= 2; $a |= 2; $a ^= 2; 注：

1. =可在一个赋值语句中出现多次，如： $value1 = $value2 = \"a string\"; 2. =作为子表达式 ($a = $b) += 3; 等价于 $a = $b;

等效表达式

none (basic assignment) $a = $a - 1; $a = $a * 2; $a = $a / 2; $a = $a % 2; $a = $a ** 2; $a = $a & 2; $a = $a | 2; $a = $a ^ 2;

描述

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 += 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 and

描述 自增，自减 单目 乘方 模式匹配

乘，除，取余，重复 加，减，联接 移位 文件状态 不等比较 相等比较 位与

位或，位异或 逻辑与 逻辑或 列表范围 条件操作符 赋值 逗号操作符

Low-precedence logical NOT Low-precedence logical AND

or, xor Low-precedence logical OR and XOR

.运算符结合性(associativity)：

操作符 ++, -- -, ~, ! ** =~, !~ *, /, %, x +, -, . <<, >> -e, -r,

<, <=, >, >=, lt, le, gt, ge==, !=, <=>, eq, ne, cmp & |, ^ && || ..

?and : =, +=, -=, *=, and so on , not and or, xor

Table 6. 运算符结合性

结合性 无

Right-to-left Right-to-left Left-to-right Left-to-right Left-to-right Left-to-right 无

Left-to-right Left-to-right Left-to-right Left-to-right Left-to-right Left-to-right Left-to-right Right-to-left Right-to-left

Left-to-right Left-to-right Left-to-right Left-to-right