Select Code to Download

    my %hash = qw(one 1 two 2);
    {
...
        print "$hash{one} $hash{two}\n"; # prints "2 3"
    }
    print "$hash{one} $hash{two}\n"; # prints "1 3"