在Perl中，有多种方法可以赋值给变量：
$var = 10;
$var += 5; # 等同于 $var = $var + 5
$var -= 2; # 等同于 $var = $var - 2
$var *= 3; # 等同于 $var = $var * 3
$var /= 2; # 等同于 $var = $var / 2
$str .= "world"; # 将 "world" 连接到 $str 变量的末尾
$var //= 5; # 如果 $var 为假（false），则将其赋值为 5
$var %= 3; # 等同于 $var = $var % 3
($var1, $var2, $var3) = (10, 20, 30);
$ref = [1, 2, 3]; # 数组引用
$ref = {name => "John"}; # 哈希引用
上述是常见的变量赋值方法，根据具体需求选择适合的赋值方式。
