+1 vote
in Perl by
Create a function that is only available inside the scope where it is defined?

1 Answer

0 votes
by
$pvt = Calculation(5,5);

print("Result = $pvt\n");

sub Calculation{

my ($fstVar, $secndVar) = @_;

my $square = sub{

return($_[0] ** 2);

};

return(&$square($fstVar) + &$square($secndVar));

};

Output: Result = 50
...