print $$f; { no strict 'refs'; print $$f; print $$g; } print $$f;