#!/usr/local/bin/perl
#Each parameter passed to a subroutine can be named, this enables you to pass them to subroutines
#in any order.
#the concept is known as Simulating Named Parameters and it employs hashes.


print "The result is:".addem(OPERAND1=>2, OPERAND2=>8);
sub addem{
        my %hash=@_;
        return $hash{OPERAND2}+$hash{OPERAND1};
        }