Perl 第三章 操作符
【 算術操作符 】+(加)、-(減)、*(乘)、/(除)、**(乘冪)、%(取余)、-(單目負)
(1)乘冪的基數不能為負，如 (-5) ** 2.5 # error；
(2)乘冪結果不能超出計算機表示的限製，如10 ** 999999 # error
(3)取余的操作數如不是整數，四舍五入成整數后運算；運算符右側不能為零
(4)單目負可用於變量︰ - $y ; # 等效於 $y * -1
【 整數比較操作符 】
操作符
描述
<
小於
>
大於
==
等於
<=
小於等於
>=
大於等於
!=
不等於
<=>
比較，返回1, 0, or -1
操作符<=>結果為︰
0 - 兩個值相等
1 - 第一個值大
-1 - 第二個值大
【 字符串比較操作符 】
操作符
描述
lt
小於
gt
大於
eq
等於
le
小於等於
ge
大於等於
ne
不等於
cmp
比較，返回1, 0, or -1
【 邏輯操作符 】
邏輯或︰$a || $b 或 $a or $b
邏輯與︰$a && $b 或 $a and $b
邏輯非︰! $a 或 not $a
邏輯異或︰$a xor $b
【 位操作符 】
位與︰&
位或︰|
位非︰~
位異或︰^
左移︰$x << 1
右移︰$x >> 2
注︰不要將&用於整數，因為PERL將會把它們轉化為無符號數。
【 賦值操作符 】
賦值操作符︰
操作符
描述
=
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;
=可在一個賦值語句中出現多次，如︰
$value1 = $value2 = "a string"; =作為子表達式
($a = $b) += 3;
等價於
$a = $b;
$a += 3;
但建議不要使用這種方式。
【 自增自減操作符 】
++、--(與C++中的用法相同)
不要在變量兩邊都使用此種操作符︰++$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++;
【 字符串聯結和重複操作符 】
聯接: .
重複︰x
聯接且賦值(類似+=)︰ .=
例︰
$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;
【 操作符的次序 】
操作符的次序︰
操作符
描述
++
, --
自增，自減
-
, ~
, !
單目
**
乘方
=~
, !~
模式匹配
*
, /
, %
, 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)︰
操作符
結合性
++
, --
無
-
, ~
, !
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
邏輯或︰$a || $b 或 $a or $b
邏輯與︰$a && $b 或 $a and $b
邏輯非︰! $a 或 not $a
邏輯異或︰$a xor $b
页:
[1]