Perl 雜項運算子示例

Perl 語言支援以下各種雜項運算子。假設變數 a 持有 10，變數 b 持有 20，則 -

序號	運算子和描述
1	. 二元運算子點 (.) 連線兩個字串。示例 - 如果 $a = "abc"，$b = "def"，則 $a.$b 將給出 "abcdef"
2	x 重複運算子 x 返回一個字串，該字串由左運算元重複右運算元指定的次陣列成。示例 - ('-' x 3) 將給出 ---。
3	.. 範圍運算子 .. 返回一個值列表，從左值到右值（每次遞增一個）。示例 - (2..5) 將給出 (2, 3, 4, 5)
4	++ 自動遞增運算子將整數值增加 1。示例 - $a++ 將給出 11
5	-- 自動遞減運算子將整數值減少 1。示例 - $a-- 將給出 9
6	-> 箭頭運算子主要用於從物件或類名取消引用方法或變數。示例 - $obj->$a 是從物件 $obj 訪問變數 $a 的示例。

示例

嘗試以下示例以瞭解 Perl 中可用的所有雜項運算子。將以下 Perl 程式複製並貼上到 test.pl 檔案中並執行此程式。

即時演示

#!/usr/local/bin/perl

$a = "abc";
$b = "def";

print "Value of \$a  = $a and value of \$b = $b\n";
 
$c = $a . $b;
print "Value of \$a . \$b = $c\n";

$c = "-" x 3;
print "Value of \"-\" x 3 = $c\n";

@c = (2..5);
print "Value of (2..5) = @c\n";

$a = 10;
$b = 15;
print "Value of \$a  = $a and value of \$b = $b\n";

$a++;
$c = $a ;
print "Value of \$a after \$a++ = $c\n";

$b--;
$c = $b ;
print "Value of \$b after \$b-- = $c\n";

執行上述程式碼時，會產生以下結果 -

Value of $a = abc and value of $b = def
Value of $a . $b = abcdef
Value of "-" x 3 = ---
Value of (2..5) = 2 3 4 5
Value of $a = 10 and value of $b = 15
Value of $a after $a++ = 11
Value of $b after $b-- = 14

當我們討論 Perl 物件和類時，我們將解釋 --> 運算子。

perl_operators.htm

列印頁面

序號	運算子和描述
1	. 二元運算子點 (.) 連線兩個字串。示例 - 如果 $a = "abc"，$b = "def"，則 $a.$b 將給出 "abcdef"
2	x 重複運算子 x 返回一個字串，該字串由左運算元重複右運算元指定的次陣列成。示例 - ('-' x 3) 將給出 ---。
3	.. 範圍運算子 .. 返回一個值列表，從左值到右值（每次遞增一個）。示例 - (2..5) 將給出 (2, 3, 4, 5)
4	++ 自動遞增運算子將整數值增加 1。示例 - $a++ 將給出 11
5	-- 自動遞減運算子將整數值減少 1。示例 - $a-- 將給出 9
6	-> 箭頭運算子主要用於從物件或類名取消引用方法或變數。示例 - $obj->$a 是從物件 $obj 訪問變數 $a 的示例。