#!/usr/bin/perl
# Numeric Input and handling
#  Usage:  perl perlarith   1  2  3  4   
#$result = (1 ** 2 ** 3);
#      print "Result of exponentiation is: ", $result, "\n";
$sum = 0; 
$prod = 1;
$exp_num = 1;
   foreach $num (@ARGV) {
        $sum = $num+$sum ;
        $prod = $num*$prod;
      }
      print "Sum is equal to ", $sum, "\n";
      print "Product is equal to ", $prod, "\n";
exit;