my $n = 1;
{
    my $n = 2;
    print $n; # Prints 2
}
print $n; # Prints 1