Select Code to Download

no strict 'refs';
$y = 'bob';
...
print $$x;    # prints 'wierd' ($$x has a value)
print ' - ';  # print a little seperator
print $bob;   # prints nothing ($bob is still undefined)