You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
12 lines
144 B
Perl
12 lines
144 B
Perl
5 years ago
|
$value = 1;
|
||
|
|
||
|
sub printem() {print "\$value = $value\n"};
|
||
|
|
||
|
sub makelocal()
|
||
|
{
|
||
|
local $value = 2;
|
||
|
printem;
|
||
|
}
|
||
|
|
||
|
makelocal;
|
||
|
printem;
|