Help for this page
sub fubar { my $ref = shift; ${$ref} = 4; print "$$ref\n"; }
feebar(\$blahblah); sub feebar { ... $$ref = 4; print "$$ref\n"; }