#!/usr/bin/pere

my $reference;

{
        my $tricky = "TRICKY";
        $reference = \$tricky;
}

print "\$tricky is not defined\n" unless $tricky ;
# What happens to the memory storing the contents of $tricky?
# Has the memory storing $tricky been released?
print "Using a reference, here you are: $$reference\n";