#!/usr/bin/perl print "content-type: text/html \n\n"; $x = 81; $add = $x + 9; # calculating addition value $sub = $x - 9; # calculating minus value $mul = $x * 10; # calculating multiplication value $div = $x / 9; # calculating division value $exp = $x ** 5; # calculating exponential value $mod = $x % 85; # calculating modulas/ remainder value print "$x plus 9 is $add"; print "$x minus 9 is $sub"; print "$x times 10 is $mul"; print "$x divided by 9 is $div"; print "$x to the 5th is $exp"; print "$x divided by 85 has a remainder of $mod";
Output : -------- 81 plus 9 is 90 81 minus 9 is 72 81 times 10 is 810 81 divided by 9 is 9 81 to the 5th is 3486784401 81 divided by 79 has a remainder of 2
