Razzlegames · April 17, 2020 23:43
diff --git a/dynamicScopeExample.pl b/dynamicScopeExample.pl
 #!/bin/perl

 $num = 4;

 sub a {
    return $num
 }

 sub b {

    local $num = 10;
    return a();
 }


 print b()."\n"; # Prints 10 instead of 4 since Dynamic!
	#!/bin/perl

	$num = 4;

	sub a {
	return $num
	}

	sub b {

	local $num = 10;
	return a();
	}


	print b()."\n"; # Prints 10 instead of 4 since Dynamic!