Return a subroutine from a subroutine : Return « Subroutine « Perl






Return a subroutine from a subroutine

   

sub printem
{
    my $string1 = shift;
    return sub {my $string2 = shift; print "$string1 $string2\n";};
}
$hellosub = printem("Hello");
&$hellosub("today.");
&$hellosub("there.");

   
    
    
  








Related examples in the same category

1.The return values of the ref function: hash
2.Return reference from a function
3.Return reference to variable
4.Return two array references from a subroutine
5.Return value from subroutine reference
6.A subroutine that returns a scalar or a list.
7.A subroutine that returns a value
8.Return Value
9.Return a reference from a sub
10.Return hash value from subroutine
11.Return more than one value from subroutine
12.Return two arrays from subroutine
13.Return value from subroutine without using the return statement
14.Returning arrays from subroutines
15.Returning data from subroutines
16.The last statement is the value to return
17.Using return statement
18.Using the return statement.