Math calculation on integer
#!C:\Perl\Bin\ $number_one = 5; $number_two = 3; print "Adding numbers:\n"; $result = $number_one + $number_two; print "5 + 3 = $result \n\n"; print "Subtracting numbers:\n"; $result = $number_one - $number_two; print "5 - 3 = $result \n\n"; print "Multiplying numbers:\n"; $result = $number_one * $number_two; print "5 * 3 = $result \n\n"; print "Dividing numbers:\n"; $result = $number_one / $number_two; print "5 / 3 = $result \n\n"; print "Raising numbers to a power:\n"; $result = $number_one ** $number_two; print "5 raised to the power of 3 is $result \n\n"; print "Obtaining a remainder after a division (Modulo):\n"; $result = $number_one % $number_two; print "5 Modulo 3 is $result \n\n";