Perl 运算符：赋值运算符
Perl 中的赋值运算符主要用于将值赋给变量。最基本的赋值运算符是 =，它用于将右侧的值赋给左侧的变量。除此之外，Perl 还支持许多复合赋值运算符，这些运算符结合了基本的算术或字符串运算与赋值操作。以下是 Perl 中常用的赋值运算符：
基本赋值运算符：
=: 将右侧的值赋给左侧的变量。
my $x = 10; # $x 现在是 10
算术复合赋值运算符：
+=: 给变量加上一个值。
$x += 5; # 相当于 $x = $x + 5;-=: 从变量中减去一个值。
$x -= 3; # 相当于 $x = $x - 3;*=: 将变量乘以一个值。
$x *= 2; # 相当于 $x = $x * 2;/=: 将变量除以一个值。
$x /= 2; # 相当于 $x = $x / 2;%=: 取模并赋值。
$x %= 3; # 相当于 $x = $x % 3;
字符串复合赋值运算符：
.=: 将一个字符串连接到现有字符串上。
my $str = "Hello"; $str .= " World"; # 相当于 $str = $str . " World";
按位复合赋值运算符：
&=: 按位与并赋值。
$x &= 6; # 相当于 $x = $x & 6;|=: 按位或并赋值。
$x |= 3; # 相当于 $x = $x | 3;^=: 按位异或并赋值。
$x ^= 4; # 相当于 $x = $x ^ 4;<<=: 按位左移并赋值。
$x <<= 2; # 相当于 $x = $x << 2;>>=: 按位右移并赋值。
$x >>= 1; # 相当于 $x = $x >> 1;
这些赋值运算符帮助程序员更加简洁和高效地对变量进行操作，而不需要编写冗长的代码。理解并熟练使用这些运算符是掌握 Perl 编程的基础之一。