The following are the arithmetic operators in Perl.

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.

    #! C:\programfiles\perl\bin\perl
    print "content-type: text/html\n\n";
    $num = 5 / 2;
    print int($num+0.5), "\n";

    3

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.

    #! C:\programfiles\perl\bin\perl
    print "content-type: text/html\n\n";
    $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";

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