print $$f;
switch on the strict refs flag;
print $$f;
print $$g;
switch off the strict refs flag;
print $$f;