举个例子 perl:
use strict;
my $add_sub = add_function_generator();
my $sum = &$add_sub(4,5);
print $sum;
sub add_function_generator{
return sub{$_[0]+$_[1]};
}
举个例子 perl:
use strict;
my $add_sub = add_function_generator();
my $sum = &$add_sub(4,5);
print $sum;
sub add_function_generator{
return sub{$_[0]+$_[1]};
}