$a = 21;

$b = 10;

​

print "Value of \$a = $a and value of \$b = $b\n";

​

$c = $a + $b;

print 'Value of $a + $b = ' . $c . "\n";

​

$c = $a - $b;

print 'Value of $a - $b = ' . $c . "\n";

​

$c = $a * $b;

print 'Value of $a * $b = ' . $c . "\n";

​

$c = $a / $b;

print 'Value of $a / $b = ' . $c . "\n";

​

$c = $a % $b;

print 'Value of $a % $b = ' . $c. "\n";

​

$a = 2;

$b = 4;

$c = $a ** $b;

print 'Value of $a ** $b = ' . $c . "\n";

​