Subroutine parameter default value : Parameter « Subroutine « Perl






  1. Perl
  2. Subroutine
  3. Parameter

Subroutine parameter default value

   

sub addem 
{
    my %hash = 
    (
        OPERAND1 => 2,
        OPERAND2 => 3,
        @_,
    );

    return $hash{OPERAND1} + $hash{OPERAND2};
}

print "The result is: " . addem();
print "\n";
print "The result is: " . addem(OPERAND1 => 3);








Related examples in the same category

1.Swap array value by using the sub range
2.Passing Arrays
3.Pass file handle global reference to a subroutine
4.Pass reference to a subroutine to another subroutine
5.Pass two array reference to a subroutine
6.Passing an array and modifying it,as a reference
7.Passing by reference with pointers
8.Passing References to a Subroutine
9.Passing a range of value to a subroutine
10.Passing array to a subroutine
11.Passing arrays to a function
12.Passing different number of parameter to a subroutine
13.Passing hash to a subroutine
14.Passing parameters to subroutines
15.Passing two values to a subroutine
16.displays all the arguments
17.Using shift(@_) to get value passed into a subroutine
18.shift parameter
19.output the subroutine arguments using special variable @_
20.Is a parameter defined
21.The loop displays each individual argument