Select Code to Download

my $var = 2;
sub x{ print $var; }
...
$var = 3;

x(); # prints 3

{
    my $var = 2;
...
my $var = 3;

x(); ## Still prints 2; the $var above is a different $var.