Arithmetic Operators in Perl

What are the Arithmetic Operators in Perl?


The following are the arithmetic operators in Perl.
Operator Description
+ Addition operator
- Subtraction operator
* Multiplication operator
/ Division operator
% Modulus operator
** Exponentiation operator

The operators +, -, *, / take two operands and return the sum, difference, product and quotient respectively.

Perl does an floating point division not an integral division. To get the integral quotient one has to use int() function. Say if you divide "int(5/2)" the result will be 2, to get the exact result use the code below.

Example :

#! C:programfilesperlbinperl
print "content-type: text/htmlnn";
$num = 5 / 2;
print int($num+0.5), "n";
Result :


You may think of using modulus operator which has got some issues. So it's used only if both the operands are positive. Not just that floating point numbers are coerced to integers.

Example :

#! C:programfilesperlbinperl
print "content-type: text/htmlnn";
$a = 82;
$b = 23.6;
$mod = $a % 80;
$mod1 = $b % 21;
print "The modulus of positive numbers:$mod";
print "<br>";
print "The modulus of floating numbers:$mod1";
Result :

The modulus of positive numbers:2
The modulus of floating numbers:2

Ask Questions

Ask Question