Assignment Operator in Perl
What are the Assignment Operator in perl?
|Operator ||Function |
|= ||Normal Assignment |
|+= ||Add and Assign |
|-= ||Subtract and Assign |
|*= ||Multiply and Assign |
|/= ||Divide and Assign |
|%= ||Modulus and Assign |
|**= ||Exponent and Assign |
Everyone knows how to use the assignment operator (=). There are other operators, when used with "=" gives a different result.
print "content-type: text/htmlnn";
$a = 50;
$a += 50;
print "Value of a using addition operator: $a n";
$a %= 8;
print "Value of a using modulus,assign operator: $a n";
Value of a using addition operator: 100
Value of a using mod,assign operator: 4
The above statement is equivalent to "$a=$a+50", thus displaying the result 100. In the same way, the working of modulus assignment operator is shown to display the remainder as "$a=$a%8" equal to 4.