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	++ 自动递增运算符将整数值加一示例- $a++ 将给出 11
5	-- 自动递减运算符将整数值减一示例- $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	++ 自动递增运算符将整数值加一示例- $a++ 将给出 11
5	-- 自动递减运算符将整数值减一示例- $a-- 将给出 9
6	-> 箭头运算符主要用于从对象或类名中取消引用方法或变量示例- $obj->$a 是从对象 $obj 访问变量 $a 的示例。