Perl 算术运算符示例
假设变量 $a 包含 10，变量 $b 包含 20，那么下面是 Perl 算术运算符 −
| 序号 | 运算符 & 描述 |
|---|---|
| 1 | + ( Addition ) 在运算符的任一侧添加值 示例 − $a + $b 将给出 30 |
| 2 | - (Subtraction) 从左手操作数中减去右手操作数 示例 − $a - $b 将给出 -10 |
| 3 | * (Multiplication) 将运算符两边的值相乘 示例 − $a * $b 将给出 200 |
| 4 | / (Division) 将左手操作数除以右手操作数 示例 − $b / $a 将给出 2 |
| 5 | % (Modulus) 将左手操作数除以右手操作数并返回余数 示例 − $b % $a 将给出 0 |
| 6 | ** (Exponent) 对算子执行指数（幂）计算 示例 − $a**$b 将给出 10 的 20 次方 |
示例
试试下面的例子来理解 Perl 中所有可用的算术运算符。 将以下 Perl 程序复制并粘贴到 test.pl 文件中并执行该程序。
#!/usr/local/bin/perl $a = 21; $b = 10; print "Value of \$a = $a and value of \$b = $b\n"; $c = $a + $b; print 'Value of $a + $b = ' . $c . "\n"; $c = $a - $b; print 'Value of $a - $b = ' . $c . "\n"; $c = $a * $b; print 'Value of $a * $b = ' . $c . "\n"; $c = $a / $b; print 'Value of $a / $b = ' . $c . "\n"; $c = $a % $b; print 'Value of $a % $b = ' . $c. "\n"; $a = 2; $b = 4; $c = $a ** $b; print 'Value of $a ** $b = ' . $c . "\n";
当上面的代码被执行时，它会产生下面的结果 −
Value of $a = 21 and value of $b = 10 Value of $a + $b = 31 Value of $a - $b = 11 Value of $a * $b = 210 Value of $a / $b = 2.1 Value of $a % $b = 1 Value of $a ** $b = 16
